|
|
A307574
|
|
Expansion of Product_{k>=1} (1 - (x/(1-x))^k)^k.
|
|
0
|
|
|
1, -1, -3, -6, -10, -11, 3, 63, 240, 677, 1622, 3415, 6277, 9485, 8917, -9299, -83683, -309568, -902995, -2315518, -5411355, -11662530, -23117627, -41317787, -62820880, -65358588, 29550902, 449154266, 1783671567, 5453429052, 14668699694, 36273441659
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
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
|
|
|
STATUS
|
approved
|
|
|
|