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