OFFSET
0,3
MATHEMATICA
nmax=40; CoefficientList[Series[Product[(1+k^2*x^k)^k, {k, 1, nmax}], {x, 0, nmax}], x]
CROSSREFS
KEYWORD
nonn
AUTHOR
Vaclav Kotesovec, Apr 25 2017
STATUS
approved