OFFSET
0,2
LINKS
Eric Weisstein's World of Mathematics, Lambert W-Function.
FORMULA
E.g.f.: (1+x) * exp( -LambertW(-2*x*(1+x)^2)/2 ).
E.g.f.: ( -LambertW(-2*x*(1+x)^2)/(2*x) )^(1/2).
a(n) = n! * Sum_{k=0..n} (2*k+1)^(k-1) * binomial(2*k+1,n-k)/k!.
PROG
(PARI) a(n) = n!*sum(k=0, n, (2*k+1)^(k-1)*binomial(2*k+1, n-k)/k!);
CROSSREFS
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Nov 11 2024
STATUS
approved