OFFSET
0,2
LINKS
Eric Weisstein's World of Mathematics, Lambert W-Function.
FORMULA
E.g.f.: B(x)^3, where B(x) is the e.g.f. of A052813.
E.g.f.: exp( - 3*LambertW(log(1 - x)) ).
a(n) = 3 * Sum_{k=0..n} (k+3)^(k-1) * |Stirling1(n,k)|.
a(n) ~ 3 * n^(n-1) * exp(7/2 + n*exp(-1) - n) / (exp(exp(-1)) - 1)^(n - 1/2). - Vaclav Kotesovec, Aug 27 2025
PROG
(PARI) my(N=20, x='x+O('x^N)); Vec(serlaplace(exp(-3*lambertw(log(1-x)))))
(PARI) a(n) = 3*sum(k=0, n, (k+3)^(k-1)*abs(stirling(n, k, 1)));
CROSSREFS
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Sep 01 2024
STATUS
approved
