A292319 Expansion of Product_{k>=1} ((1 - k!*x^k)/(1 + k!*x^k)).

1, -2, -2, -6, -22, -130, -870, -6578, -56270, -533346, -5551534, -63053074, -776254350, -10302652946, -146717718254, -2232271391058, -36147843303406, -620859957094930, -11275285124686446, -215901942195987986, -4347742535086701038, -91860773988102875922

Offset

0,2

Links

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

Formula

Convolution of A292279 and A292280.

Convolution inverse of A292318.

a(n) ~ -2 * n! * (1 - 2/n - 2/n^2 - 8/n^3 - 42/n^4 - 306/n^5 - 2812/n^6 - 30246/n^7 - 368710/n^8 - 5015300/n^9 - 75279670/n^10). - Vaclav Kotesovec, Sep 15 2017

Mathematica

nmax = 25; CoefficientList[Series[Product[(1 - k!*x^k)/(1 + k!*x^k), {k, 1, nmax}], {x, 0, nmax}], x] (* Vaclav Kotesovec, Sep 15 2017 *)

Crossrefs

Cf. A292279, A292280, A292318.

Sequence in context: A085403 A112478 A184715 * A290653 A138801 A188958

Adjacent sequences: A292316 A292317 A292318 * A292320 A292321 A292322

Keyword

sign

Author

Seiichi Manyama, Sep 14 2017

Status

approved