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

1, 1, 33, 2220, 264908, 49163017, 13120646934, 4762819155533, 2257121941722156, 1353302171994081060, 1001440370811165212942, 896481721940248699989226, 954894511643935287905899347, 1193519554843091905978411389666

Offset: 0

Author

Seiichi Manyama, Nov 04 2017

Keywords

• nonn

Links

• Seiichi Manyama, Table of n, a(n) for n = 0..214

Crossrefs

Column k=2 of A294609.

Cf. A294607.

Programs

Mathematica

nmax = 20; CoefficientList[Series[Product[1/(1 - k*x^k)^(k^(2*k)), {k, 1, nmax}], {x, 0, nmax}], x] (* Vaclav Kotesovec, Nov 05 2017 *)

PARI

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

Formula

Convolution inverse of A294607.