A355105 E.g.f. A(x) satisfies A(x) = 1 + 3 * x * A(log(1+x)).

1, 3, 18, 135, 1044, 6210, -5994, -760347, -3009960, 261689616, 1960394400, -220644396522, -1043258760828, 366570209524896, -3109452797977470, -972076070389224105, 36160406771040130320, 3274635904971823559880, -331428842765036684941320

Offset

0,2

Links

Table of n, a(n) for n=0..18.

Formula

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

a(n) = 3 * n * A355097(n-1) for n>0.

Prog

(PARI) a_vector(n) = my(v=vector(n+1)); v[1]=1; for(i=1, n, v[i+1]=3*i*sum(j=0, i-1, stirling(i-1, j, 1)*v[j+1])); v;

Crossrefs

Cf. A354729, A355104.

Cf. A355097.

Sequence in context: A168072 A251733 A355103 * A095776 A114178 A005159

Adjacent sequences: A355102 A355103 A355104 * A355106 A355107 A355108

Keyword

sign

Author

Seiichi Manyama, Jun 19 2022

Status

approved