A293123 E.g.f.: exp(-x^3/(1+x)).

1, 0, 0, -6, 24, -120, 1080, -10080, 100800, -1149120, 14515200, -199584000, 2973801600, -47740492800, 820928908800, -15049152518400, 292919058432000, -6031865968128000, 130990787582054400, -2991455760887193600, 71659101232502784000, -1796424431562528768000

Offset

0,4

Links

Seiichi Manyama, Table of n, a(n) for n = 0..444

Formula

a(n) = (-1)^n * A293049(n).

a(n) ~ (-1)^n * n^(n-1/4) * exp(-5/2 + 2*sqrt(n) - n) / sqrt(2). - Vaclav Kotesovec, Sep 30 2017

Mathematica

CoefficientList[Series[E^(-x^3/(1+x)), {x, 0, 20}], x] * Range[0, 20]! (* Vaclav Kotesovec, Sep 30 2017 *)

Prog

(PARI) x='x+O('x^66); Vec(serlaplace(exp(-x^3/(1+x))))

Crossrefs

Column k=2 of A293134.

Cf. A293049.

Sequence in context: A355285 A182083 A293049 * A355575 A060249 A052557

Adjacent sequences: A293120 A293121 A293122 * A293124 A293125 A293126

Keyword

sign

Author

Seiichi Manyama, Sep 30 2017

Status

approved