Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A293121
Expansion of e.g.f. exp(x^3/(1+x)).
3
1, 0, 0, 6, -24, 120, -360, 0, 20160, -302400, 3628800, -39916800, 419126400, -4151347200, 36324288000, -207048441600, -1743565824000, 103742166528000, -2925529096089600, 69945932735078400, -1571249213614080000, 34354603773794304000, -741528257908838400000
OFFSET
0,4
LINKS
FORMULA
E.g.f.: exp(x^3/(1+x)).
a(n) = (-1)^n * A293118(n).
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 A293133.
Cf. A293118.
Sequence in context: A100934 A127917 A293118 * A026982 A051197 A374722
KEYWORD
sign
AUTHOR
Seiichi Manyama, Sep 30 2017
STATUS
approved