A058316 Apply inverse of "INVERT" transform to A007097, i.e.; the coefficients of the series 1/(1 + 2x + 3x^2 + 5x^3 + 11x^4 + 31x^5 + 127x^6 + 709x^7 ... ).

1, -2, 1, -1, -2, -7, -51, -342, -3165, -34781, -465842, -7428379, -139065247, -3014260732, -74720908617, -2095541497991, -65859561109214, -2300344376478515

Offset

0,2

Links

Table of n, a(n) for n=0..17.

Mathematica

CoefficientList[ Series[ 1/(1 + Sum[ NestList[ Prime, 1, n ] [ [ -1 ] ]*x^n, {n, 1, 17} ] ), {x, 0, 17} ], x ]

Crossrefs

Sequence in context: A022873 A323739 A122160 * A082386 A336521 A356093

Adjacent sequences: A058313 A058314 A058315 * A058317 A058318 A058319

Keyword

sign

Author

Robert G. Wilson v, Dec 11 2000

Status

approved