login
A378046
E.g.f. satisfies A(x) = (1+x) * exp(x * A(x)^3 / (1+x)^2).
1
1, 2, 11, 169, 4049, 132881, 5542495, 280694135, 16730578625, 1147444968385, 89015365063991, 7707022678811567, 736734708409976017, 77070404075178587633, 8757816984586841345231, 1074244834335107678837191, 141469329806979182825146625, 19908315372027482035799282177
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))/3 ).
a(n) = n! * Sum_{k=0..n} (3*k+1)^(k-1) * binomial(k+1,n-k)/k!.
PROG
(PARI) a(n) = n!*sum(k=0, n, (3*k+1)^(k-1)*binomial(k+1, n-k)/k!);
CROSSREFS
Cf. A363478.
Sequence in context: A067968 A295269 A197336 * A013050 A051255 A120445
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Nov 15 2024
STATUS
approved