OFFSET
0,8
EXAMPLE
G.f.: A(x) = 1 - x + x^2 - x^3 + x^4 - x^6 + 2*x^7 - 3*x^8 + 3*x^9 - 2*x^10 + ...
MATHEMATICA
nmax = 55; CoefficientList[Series[1/(1 + ContinuedFractionK[x^k^2, 1, {k, 1, nmax}]), {x, 0, nmax}], x]
CROSSREFS
KEYWORD
sign
AUTHOR
Ilya Gutkovskiy, Apr 18 2017
STATUS
approved