OFFSET
0,2
FORMULA
a(n) = Sum_{k=0..n} A000407(k) * |Stirling1(n,k)|.
MATHEMATICA
nmax=16; CoefficientList[Series[1 / (1 + 4 * Log[1-x])^(3/2), {x, 0, nmax}], x]*Range[0, nmax]! (* Stefano Spezia, Sep 03 2024 *)
PROG
(PARI) a000407(n) = (2*n+1)!/n!;
a(n) = sum(k=0, n, a000407(k)*abs(stirling(n, k, 1)));
CROSSREFS
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Sep 03 2024
STATUS
approved