login
A292912
E.g.f.: exp(1/4! * x^4 * exp(-x)).
3
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
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
KEYWORD
sign
AUTHOR
Seiichi Manyama, Sep 26 2017
STATUS
approved