OFFSET
0,3
FORMULA
E.g.f. A(x) satisfies A(x) = exp( x + x*Sum_{k=1..4} Stirling2(4,k) * x^k * (d^k/dx^k A(x)) ).
PROG
(PARI) a_vector(n) = my(v=vector(n+1)); v[1]=1; for(i=1, n, v[i+1]=v[i]+sum(j=0, i-1, (1+j)*j^4*binomial(i-1, j)*v[j+1]*v[i-j])); v;
CROSSREFS
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Jul 24 2025
STATUS
approved
