OFFSET
0,3
FORMULA
PROG
(PARI) {a(n)=local(A=1+x, B); for(i=0, n, A=1+x*A*subst(A, x, x*A+x*O(x^n))); B=A; for(i=1, 2, B=subst(B, x, x*A+x*O(x^n))); polcoeff(B, n)}
CROSSREFS
KEYWORD
nonn
AUTHOR
Paul D. Hanna, Mar 11 2007
STATUS
approved