OFFSET
0,3
FORMULA
a(n) = Sum_{k=0..n} (2*n+k+1)^(k-1) * |Stirling1(n,k)|.
MATHEMATICA
m = 18; (* number of terms *)
A[_] = 0;
Do[A[x_] = 1/(1 - x*A[x]^2)^A[x] + O[x]^m // Normal, {m}];
CoefficientList[A[x], x]*Range[0, m-1]! (* Jean-François Alcover, Sep 12 2022 *)
PROG
(PARI) a(n) = sum(k=0, n, (2*n+k+1)^(k-1)*abs(stirling(n, k, 1)));
CROSSREFS
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Sep 07 2022
STATUS
approved