login
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
OFFSET
0,3
COMMENTS
Euler transform of A010872.
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
Sequence in context: A331788 A375404 A206433 * A237666 A285187 A034411
KEYWORD
nonn
AUTHOR
Vaclav Kotesovec, Mar 24 2018
STATUS
approved