A292912 E.g.f.: exp(1/4! * x^4 * exp(-x)).

1, 0, 0, 0, 1, -5, 15, -35, 105, -756, 6510, -46530, 283470, -1667380, 11457446, -99776040, 969295145, -9298091180, 86154691680, -804769174536, 8052676029420, -88489327173660, 1038440150703340, -12501684521410700, 151866259113256611

Offset

0,6

Links

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

Formula

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

Mathematica

With[{nn=30}, CoefficientList[Series[Exp[x^4/4! Exp[-x]], {x, 0, nn}], x] Range[ 0, nn]!] (* Harvey P. Dale, Nov 12 2021 *)

Prog

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

Crossrefs

Column k=4 of A292948.

Cf. A145454.

Sequence in context: A019531 A321345 A145454 * A346755 A091875 A056413

Adjacent sequences: A292909 A292910 A292911 * A292913 A292914 A292915

Keyword

sign

Author

Seiichi Manyama, Sep 26 2017

Status

approved