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