A292803 Expansion of 1/(1 + x^2/(1 + x^3/(1 + x^5/(1 + x^7/(1 + x^11/(1 + ... + x^prime(k)/(1 + ... ))))))), a continued fraction.

1, 0, -1, 0, 1, 1, -1, -2, 0, 3, 1, -3, -3, 3, 5, -1, -8, -1, 9, 6, -11, -11, 8, 21, -5, -27, -8, 38, 20, -36, -50, 38, 72, -9, -118, -15, 131, 100, -170, -166, 118, 330, -94, -411, -129, 618, 294, -567, -817, 663, 1124, -139, -1963, -162, 2087, 1691, -2902, -2605, 1851, 5562, -1758

Offset: 0

Author

Ilya Gutkovskiy, Sep 23 2017

Keywords

• sign

Crossrefs

Cf. A000040, A269353, A285407, A292801.

Programs

Mathematica

nmax = 60; CoefficientList[Series[1/(1 + ContinuedFractionK[x^Prime[k], 1, {k, 1, nmax}]), {x, 0, nmax}], x]