OFFSET
0,2
LINKS
Vaclav Kotesovec, Table of n, a(n) for n = 0..10000
FORMULA
log(a(n)) ~ Pi*sqrt(3*n/2).
MATHEMATICA
nmax = 50; CoefficientList[Series[Product[((1 + x^k)/(1 - x^k))^(IntegerExponent[k, 3] + 1), {k, 1, nmax}], {x, 0, nmax}], x]
nmax = 50; CoefficientList[Series[Product[(1+x^(i*3^j))/(1-x^(i*3^j)), {i, 1, nmax}, {j, 0, Log[nmax]/Log[3]+1}], {x, 0, nmax}], x]
CROSSREFS
KEYWORD
nonn
AUTHOR
Vaclav Kotesovec, Feb 21 2026
STATUS
approved
