|
|
A301589
|
|
Expansion of Product_{k>=1} 1/(1 - x^k)^(mod(k,3)).
|
|
2
|
|
|
1, 1, 3, 3, 7, 9, 15, 20, 31, 41, 61, 79, 113, 146, 201, 260, 349, 447, 589, 748, 972, 1226, 1571, 1968, 2495, 3106, 3900, 4825, 6008, 7392, 9137, 11181, 13731, 16719, 20409, 24737, 30032, 36243, 43783, 52620, 63282, 75760, 90727, 108222, 129097, 153464
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
COMMENTS
|
|
|
LINKS
|
|
|
FORMULA
|
a(n) ~ exp(Pi*sqrt(2*n/3)) * Pi^(2/3) / (2^(5/6) * 3^(7/6) * Gamma(1/3) * n^(5/6)).
|
|
MATHEMATICA
|
nmax = 60; CoefficientList[Series[Product[1/(1-x^k)^Mod[k, 3], {k, 1, nmax}], {x, 0, nmax}], x]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|