OFFSET
0,3
LINKS
Seiichi Manyama, Table of n, a(n) for n = 0..516 (terms 0..200 from Vincenzo Librandi)
Vaclav Kotesovec, Asymptotic solution of the equations using the Lambert W-function
FORMULA
From Vaclav Kotesovec, Aug 06 2014: (Start)
a(n) ~ n^n / (exp(n*(1+r)/(2+r)) * r^n * sqrt((1+r)*(4+r)/(2+r))), where r is the root of the equation r^2*(2+r)*exp(r) = n.
(a(n)/n!)^(1/n) ~ exp(1/(3*LambertW(n^(1/3)/3))) / (3*LambertW(n^(1/3)/3)).
(End)
a(n) = Sum_{k = 0..n/2} C(n,2*k) * ((2*k)!/k!) * k^(n-2*k). - David Einstein, Oct 30 2016
MATHEMATICA
With[{nn = 25}, CoefficientList[Series[Exp[x^2 Exp[x]], {x, 0, nn}],
x] Range[0, nn]!] (* Bruno Berselli, Sep 14 2012 *)
PROG
CROSSREFS
Column k=2 of A292978.
KEYWORD
nonn
AUTHOR
Joerg Arndt, Sep 14 2012
STATUS
approved