login
A362347
a(n) = n! * Sum_{k=0..floor(n/2)} k^k / (k! * (n-2*k)!).
6
1, 1, 3, 7, 61, 261, 3991, 24403, 524217, 4149001, 114544171, 1111976031, 37492210933, 431097055117, 17165526306111, 228085258466731, 10472666396599921, 157882659583461393, 8211536252680154707, 138474928851961700791, 8045878340298511456941
OFFSET
0,3
LINKS
Eric Weisstein's World of Mathematics, Lambert W-Function.
FORMULA
E.g.f.: exp(x) / (1 + LambertW(-x^2)).
PROG
(PARI) my(N=30, x='x+O('x^N)); Vec(serlaplace(exp(x)/(1+lambertw(-x^2))))
CROSSREFS
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Apr 17 2023
STATUS
approved