OFFSET
0,2
EXAMPLE
G.f. A(x) = 1 + 2*x + 7*x^2 + 33*x^3 + 185*x^4 + 1170*x^5 + 8121*x^6 + 60846*x^7 + 486753*x^8 + ...
MATHEMATICA
nmax = 22; CoefficientList[Series[1/(1 - x + ContinuedFractionK[-x, 1 - (k + 1) x, {k, 1, nmax}]), {x, 0, nmax}], x]
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Apr 04 2018
STATUS
approved