|
|
A291645
|
|
Expansion of the series reversion of -1 + Product_{k>=1} (1 + x^(k^2)).
|
|
0
|
|
|
1, 0, 0, -1, -1, 0, 4, 9, 4, -23, -78, -78, 132, 694, 1088, -443, -6169, -13452, -4646, 52247, 155891, 143796, -391672, -1715015, -2481013, 2107735, 17836000, 35704800, 3037215, -172386166, -465009936, -338007604, 1487272659, 5624864403, 7125599375, -10208041482
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,7
|
|
COMMENTS
|
Reversion of g.f. (with constant term omitted) for A033461.
|
|
LINKS
|
|
|
FORMULA
|
G.f. A(x) satisfies: -1 + Product_{k>=1} (1 + A(x)^(k^2)) = x.
|
|
MATHEMATICA
|
nmax = 36; Rest[CoefficientList[InverseSeries[Series[-1 + Product[1 + x^k^2, {k, 1, nmax}], {x, 0, nmax}], x], x]]
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|