OFFSET
0,3
MATHEMATICA
m = 31; CoefficientList[Series[Product[(1 - (x/(1-x))^k)^k, {k, 1, m}], {x, 0, m}], x] (* Amiram Eldar, May 14 2021 *)
PROG
(PARI) N=66; x='x+O('x^N); Vec(prod(k=1, N, (1-(x/(1-x))^k)^k))
CROSSREFS
KEYWORD
sign
AUTHOR
Seiichi Manyama, Apr 15 2019
STATUS
approved