OFFSET
0,3
FORMULA
E.g.f.: Sum_{k>=1} log(1 + k*x)^k / k.
MATHEMATICA
nmax=16; Range[0, nmax]!CoefficientList[Series[Sum[(Log[1 + k*x])^k / k, {k, nmax}], {x, 0, nmax}], x] (* Stefano Spezia, Jun 19 2024 *)
PROG
(PARI) a(n) = sum(k=1, n, k!*k^(n-1)*stirling(n, k, 1));
CROSSREFS
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Jun 19 2024
STATUS
approved