A291335 a(n) = [x^n] 1/(1 + n*x/(1 + n*x^2/(1 + n*x^3/(1 + n*x^4/(1 + n*x^5/(1 - ...)))))), a continued fraction.

1, -1, 4, -18, 128, -1375, 19224, -328937, 6594560, -150804585, 3866510000, -109763181693, 3416538258432, -115680589167780, 4232540747232224, -166402907912306250, 6995675389431382016, -313160900844718102493, 14871520058618111804352, -746718033885917073001959

Offset: 0

Author

Ilya Gutkovskiy, Aug 22 2017

Keywords

• sign

Links

• Eric Weisstein's World of Mathematics, Rogers-Ramanujan Continued Fraction

Crossrefs

Main diagonal of A286932.

Programs

Mathematica

Table[SeriesCoefficient[1/(1 + ContinuedFractionK[n x^i, 1, {i, 1, n}]), {x, 0, n}], {n, 0, 19}]

Formula

a(n) = A286932(n,n).

a(n) ~ (-1)^n * exp(-1) * n^n. - Vaclav Kotesovec, Aug 26 2017