|
|
A293721
|
|
E.g.f.: exp(x + 4*x^2 + 9*x^3).
|
|
2
|
|
|
1, 1, 9, 79, 457, 5901, 66841, 720259, 11155089, 158315257, 2361665161, 42133751991, 720156599449, 13181971424389, 265545621153177, 5280775950377131, 111888028465044001, 2508562975185903729, 56507353426001537929, 1342159313030965211167
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
FORMULA
|
a(n) ~ 3^(n - 1/2) * n^(2*n/3) * exp(-392/6561 - 2*n/3 + 49*n^(1/3)/243 + 4*n^(2/3)/9). - Vaclav Kotesovec, Oct 15 2017
|
|
MATHEMATICA
|
CoefficientList[Series[E^(x + 4*x^2 + 9*x^3), {x, 0, 20}], x] * Range[0, 20]! (* Vaclav Kotesovec, Oct 15 2017 *)
|
|
PROG
|
(PARI) N=66; x='x+O('x^N); Vec(serlaplace(exp(x+4*x^2+9*x^3)))
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|