OFFSET
0,3
LINKS
Eric Weisstein's World of Mathematics, Lambert W-Function.
FORMULA
E.g.f.: exp(x - LambertW(-x^2/2)) = -2 * LambertW(-x^2/2)/x^2 * exp(x).
MATHEMATICA
Table[n!Sum[(k+1)^(k-1)/(2^k k!(n-2k)!), {k, 0, Floor[n/2]}], {n, 0, 25}] (* Harvey P. Dale, Mar 30 2024 *)
PROG
(PARI) my(N=30, x='x+O('x^N)); Vec(serlaplace(exp(x-lambertw(-x^2/2))))
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Seiichi Manyama, Apr 23 2023
STATUS
approved