A350720 a(n) = Sum_{k=0..n} k! * 3^k * k^n * Stirling1(n,k).

1, 3, 69, 3948, 422082, 72567522, 18304992558, 6367730357160, 2921446409138136, 1709074810258369776, 1241694104839498851552, 1096850187800368469477424, 1157691464039682741551221152, 1438880771284303822650674399664

Offset

0,2

Links

Seiichi Manyama, Table of n, a(n) for n = 0..213

Formula

E.g.f.: Sum_{k>=0} (3 * log(1 + k*x))^k.

Mathematica

a[0] = 1; a[n_] := Sum[k! * 3^k * k^n * StirlingS1[n, k], {k, 1, n}]; Array[a, 14, 0] (* Amiram Eldar, Feb 03 2022 *)

Prog

(PARI) a(n) = sum(k=0, n, k!*3^k*k^n*stirling(n, k, 1));
(PARI) my(N=20, x='x+O('x^N)); Vec(serlaplace(sum(k=0, N, (3*log(1+k*x))^k)))

Crossrefs

Cf. A320083, A350719.

Cf. A195263, A335531, A350721.

Sequence in context: A284058 A012096 A012074 * A247031 A037109 A304146

Adjacent sequences: A350717 A350718 A350719 * A350721 A350722 A350723

Keyword

nonn

Author

Seiichi Manyama, Feb 03 2022

Status

approved