OFFSET
0,3
LINKS
Eric Weisstein's World of Mathematics, Lambert W-Function.
FORMULA
G.f.: Sum_{k>=0} (2*k*x)^k / (1 + x)^(k+1).
a(n) = (-1)^n * Sum_{k=0..n} (-2*k)^k * binomial(n,k).
PROG
(PARI) my(N=20, x='x+O('x^N)); Vec(serlaplace(exp(-x)/(1 + lambertw(-2*x))))
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Seiichi Manyama, May 05 2023
STATUS
approved