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