OFFSET
0,3
MATHEMATICA
nmax = 40; CoefficientList[Series[1/(1 + ContinuedFractionK[x^(1 + k (1 + (-1)^k)/4), 1, {k, 0, nmax}]), {x, 0, nmax}], x]
CROSSREFS
KEYWORD
sign
AUTHOR
Ilya Gutkovskiy, Dec 07 2017
STATUS
approved