OFFSET
0,2
LINKS
Vaclav Kotesovec, Table of n, a(n) for n = 0..1000
FORMULA
a(n) ~ c * (-2)^n, where c = Product_{j>=1} 1/(1 - 1/(-2)^j)^(j+1) = 0.81033497534928929188778847125052151513524786804782471307090750707405...
MATHEMATICA
nmax = 40; CoefficientList[Series[Product[(1/(1 + 2*x^k))^k, {k, 1, nmax}], {x, 0, nmax}], x]
nmax = 40; CoefficientList[Series[Exp[Sum[(-1)^k*2^k/k*x^k/(1-x^k)^2, {k, 1, nmax}]], {x, 0, nmax}], x]
CROSSREFS
KEYWORD
sign
AUTHOR
Vaclav Kotesovec, Aug 24 2015
STATUS
approved