login
A362702
Expansion of e.g.f. 1/(1 + LambertW(-x^2 * exp(x))).
4
1, 0, 2, 6, 60, 500, 6150, 81522, 1300376, 23024808, 459915210, 10104914270, 243652575012, 6378414900156, 180405368976014, 5478759958122570, 177868544365861680, 6146407749811022672, 225262698504062963346, 8727083181657584963766
OFFSET
0,3
LINKS
Eric Weisstein's World of Mathematics, Lambert W-Function.
FORMULA
a(n) = n! * Sum_{k=0..floor(n/2)} k^(n-k) / (k! * (n-2*k)!).
PROG
(PARI) my(N=20, x='x+O('x^N)); Vec(serlaplace(1/(1+lambertw(-x^2*exp(x)))))
CROSSREFS
KEYWORD
nonn,easy,changed
AUTHOR
Seiichi Manyama, Apr 30 2023
STATUS
approved