A356960 E.g.f. satisfies: A(x) = 1/(1 - x * A(x)^3)^A(x).

1, 1, 10, 207, 6620, 288040, 15891234, 1063219640, 83665143176, 7572321823536, 775010639465040, 88510236140283672, 11158965455394331992, 1539441941412714237912, 230675631266761375815288, 37309025609545822539225240, 6478248637390494598048444224

Offset

0,3

Links

Sidney Cadot, Table of n, a(n) for n = 0..100

Formula

a(n) = Sum_{k=0..n} (3*n+k+1)^(k-1) * |Stirling1(n,k)|.

Mathematica

a[n_] := Sum[(3*n + k + 1)^(k - 1)*Abs[StirlingS1[n, k]], {k, 0, n}] (* Sidney Cadot, Jan 05 2023 *)

Prog

(PARI) a(n) = sum(k=0, n, (3*n+k+1)^(k-1)*abs(stirling(n, k, 1)));

Crossrefs

Cf. A052813, A349556, A356914.

Cf. A356973.

Sequence in context: A088746 A293970 A356973 * A364989 A245912 A245918

Adjacent sequences: A356957 A356958 A356959 * A356961 A356962 A356963

Keyword

nonn

Author

Seiichi Manyama, Sep 07 2022

Status

approved