OFFSET
0,2
FORMULA
G.f.: Product_{k>=1} (1 + 2*(4*x)^k)^(1/4).
a(n) ~ (-1)^(n+1) * QPochhammer(-1/2)^(1/4) * 8^n / (4 * Gamma(3/4) * n^(5/4)).
MATHEMATICA
nmax = 25; CoefficientList[Series[Product[1+2*x^k, {k, 1, nmax}]^(1/4), {x, 0, nmax}], x] * 4^Range[0, nmax]
nmax = 25; CoefficientList[Series[Product[1+2*(4*x)^k, {k, 1, nmax}]^(1/4), {x, 0, nmax}], x]
CROSSREFS
KEYWORD
sign
AUTHOR
Vaclav Kotesovec, Feb 28 2024
STATUS
approved