OFFSET
0,3
FORMULA
E.g.f. A(x) satisfies A(x) = exp( x + x*Sum_{k=1..4} binomial(3,k-1) * x^k/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)*binomial(j+3, 4)*binomial(i-1, j)*v[j+1]*v[i-j])); v;
CROSSREFS
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Jul 24 2025
STATUS
approved
