|
%I #17 Apr 20 2023 17:48:07
%S 1,0,0,6,-24,120,-360,0,20160,-302400,3628800,-39916800,419126400,
%T -4151347200,36324288000,-207048441600,-1743565824000,103742166528000,
%U -2925529096089600,69945932735078400,-1571249213614080000,34354603773794304000,-741528257908838400000
%N Expansion of e.g.f. exp(x^3/(1+x)).
%H Seiichi Manyama, <a href="/A293121/b293121.txt">Table of n, a(n) for n = 0..450</a>
%F E.g.f.: exp(x^3/(1+x)).
%F a(n) = (-1)^n * A293118(n).
%t CoefficientList[Series[E^(x^3/(1+x)), {x, 0, 20}], x] * Range[0, 20]! (* _Vaclav Kotesovec_, Sep 30 2017 *)
%o (PARI) x='x+O('x^66); Vec(serlaplace(exp(x^3/(1+x))))
%Y Column k=2 of A293133.
%Y Cf. A111884, A293120.
%Y Cf. A293118.
%K sign
%O 0,4
%A _Seiichi Manyama_, Sep 30 2017
|
