%I #18 Nov 09 2017 11:38:45

%S 1,-1,-16,-713,-64711,-9688521,-2165724176,-675843638952,

%T -280752881225790,-149800127712465769,-99844730464906330029,

%U -81300082264515781043363,-79413710307214816810372248,-91652445696245266803423194130

%N Expansion of Product_{k>=1} (1 - k^k*x^k)^(k^k).

%H Seiichi Manyama, <a href="/A294704/b294704.txt">Table of n, a(n) for n = 0..214</a>

%F a(0) = 1 and a(n) = -(1/n) * Sum_{k=1..n} A294773(k)*a(n-k) for n > 0.

%F a(n) ~ -n^(2*n). - _Vaclav Kotesovec_, Nov 09 2017

%t nmax = 20; CoefficientList[Series[Product[(1 - k^k*x^k)^(k^k), {k, 1, nmax}], {x, 0, nmax}], x]

%o (PARI) N=20; x='x+O('x^N); Vec(prod(k=1, N, (1-k^k*x^k)^k^k))

%Y Column k=1 of A294699.

%Y Cf. A294757, A294773.

%K sign

%O 0,3

%A _Seiichi Manyama_, Nov 07 2017