OFFSET
0,4
LINKS
Eric Weisstein's World of Mathematics, Rogers-Ramanujan Continued Fraction
FORMULA
a(n) = Sum_{k=0..n} Stirling1(n,k)*A005169(k)*k!.
MATHEMATICA
nmax = 22; CoefficientList[Series[1/(1 + ContinuedFractionK[-Log[1 + x]^k, 1, {k, 1, nmax}]), {x, 0, nmax}], x] Range[0, nmax]!
CROSSREFS
KEYWORD
sign
AUTHOR
Ilya Gutkovskiy, Dec 19 2018
STATUS
approved