OFFSET
0,4
LINKS
Seiichi Manyama, Table of n, a(n) for n = 0..100
EXAMPLE
G.f.: A(x) = 1 + x + x^2 + 3*x^3 + 5*x^4 + 11*x^5 + 33*x^6 + 67*x^7 + 169*x^8 + ...
MATHEMATICA
nmax = 30; CoefficientList[Series[1/(1 + ContinuedFractionK[-k! x^k, 1, {k, 1, nmax}]), {x, 0, nmax}], x]
PROG
(PARI) a(n) = my(A=1+O(x)); for(i=1, n, A=1-(n-i+1)!*x^(n-i+1)/A); polcoef(1/A, n); \\ Seiichi Manyama, Apr 16 2021
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Apr 17 2017
STATUS
approved