A294607 - OEIS

%I #13 Nov 07 2017 11:08:43

%S 1,-1,-32,-2155,-259477,-48496477,-13001163543,-4732376829091,

%T -2246495500625034,-1348407234549297356,-998562296547665810106,

%U -894380299878766527522232,-953030926136814034550634393,-1191548000252369142490485950437

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

%H Seiichi Manyama, <a href="/A294607/b294607.txt">Table of n, a(n) for n = 0..213</a>

%t nmax = 20; CoefficientList[Series[Product[(1 - k*x^k)^(k^(2*k)), {k, 1, nmax}], {x, 0, nmax}], x] (* _Vaclav Kotesovec_, Nov 05 2017 *)

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

%Y Column k=2 of A294605.

%K sign

%O 0,3

%A _Seiichi Manyama_, Nov 04 2017