login
A378094
E.g.f. satisfies A(x) = exp( x^2 * A(x) / (1-x) ) / (1-x).
1
1, 1, 4, 24, 204, 2220, 29640, 469560, 8623440, 180306000, 4231815840, 110217270240, 3155551439040, 98529432281280, 3332752472649600, 121416875166787200, 4740431035737196800, 197475789694088505600, 8743499113411321459200, 410050296758706725721600
OFFSET
0,3
LINKS
Eric Weisstein's World of Mathematics, Lambert W-Function.
FORMULA
E.g.f.: exp( -LambertW(-x^2/(1-x)^2) )/(1-x).
a(n) = n! * Sum_{k=0..floor(n/2)} (k+1)^(k-1) * binomial(n,2*k)/k!.
a(n) ~ sqrt(2) * (1 + exp(1/2))^(n + 3/2) * n^(n-1) / exp(n - 1/4). - Vaclav Kotesovec, Nov 16 2024
PROG
(PARI) a(n) = n!*sum(k=0, n\2, (k+1)^(k-1)*binomial(n, 2*k)/k!);
CROSSREFS
Cf. A371038.
Sequence in context: A089946 A343094 A012244 * A342168 A240429 A240297
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Nov 16 2024
STATUS
approved