OFFSET
0,2
LINKS
Vaclav Kotesovec, Table of n, a(n) for n = 0..1000
MATHEMATICA
nmax = 33; CoefficientList[Series[1/(1 + x + ContinuedFractionK[x^k, 1 + x, {k, 1, nmax}]), {x, 0, nmax}], x]
nmax = 40; CoefficientList[Series[1/Fold[(1 + x + #2/#1) &, 1, Reverse[x^Range[nmax]]], {x, 0, nmax}], x] (* Vaclav Kotesovec, Sep 24 2017 *)
CROSSREFS
KEYWORD
sign
AUTHOR
Ilya Gutkovskiy, Sep 23 2017
STATUS
approved