OFFSET
0,2
COMMENTS
In table A124460, the g.f. of row n, R_n(y), simultaneously satisfies: R_n(y) = Sum_{k>=0} y^k * R_k(y)^n for n>=0.
PROG
(PARI) {a(n)=local(R=vector(n+2, r, vector(n+2, c, binomial(r+c-2, c-1)))); for(i=0, n, for(r=0, n, R[r+1]=Vec(sum(c=0, n, x^c*Ser(R[c+1])^r+O(x^(n+1)))))); subst(truncate(subst(Ser(vector(n+1, j, R[j][n+1])), x, x/(1+x))/(1+x)), x, 1)}
CROSSREFS
KEYWORD
nonn
AUTHOR
Paul D. Hanna, Nov 03 2006
STATUS
approved