|
%I #13 Sep 16 2017 17:11:26
%S 1,-2,-6,-40,-386,-4952,-77116,-1406164,-29389570,-692122610,
%T -18136684128,-523599632000,-16516245738140,-565284631133600,
%U -20867650682241704,-826570263691236456,-34971594470460748146,-1574134630989710480092
%N Expansion of Product_{k>=1} ((1 - k^k*x^k)/(1 + k^k*x^k)).
%H Seiichi Manyama, <a href="/A292407/b292407.txt">Table of n, a(n) for n = 0..386</a>
%F Convolution of A292311 and A292312.
%F Convolution inverse of A292406.
%F a(n) ~ -2*n^n * (1 - 2*exp(-1)/n - (exp(-1) + 6*exp(-2))/n^2). - _Vaclav Kotesovec_, Sep 16 2017
%t nmax = 20; CoefficientList[Series[Product[(1 - k^k*x^k)/(1 + k^k*x^k), {k, 1, nmax}], {x, 0, nmax}], x] (* _Vaclav Kotesovec_, Sep 16 2017 *)
%Y Cf. A292311, A292312, A292406.
%K sign
%O 0,2
%A _Seiichi Manyama_, Sep 15 2017
|
