OFFSET
0,5
LINKS
Vaclav Kotesovec, Table of n, a(n) for n = 0..10000
FORMULA
a(n) ~ c * 2^(n/4), where
c = 6.362854320457366874306510139107365081972383711876544726... if mod(n,4)=0
c = 6.470997903106304472752360748461108347899808941622559468... if mod(n,4)=1
c = 6.154059402265470959096395812318265046714869376472639022... if mod(n,4)=2
c = 5.624747659153211728892605407048217108787120474872434485... if mod(n,4)=3
MATHEMATICA
nmax = 100; CoefficientList[Series[Product[1/(1 - k*x^(k^2)), {k, 1, nmax}], {x, 0, nmax}], x]
CROSSREFS
KEYWORD
nonn
AUTHOR
Vaclav Kotesovec, Apr 15 2017
STATUS
approved