OFFSET
1,2
COMMENTS
The g.f. G(x,y) of square array A192404 satisfies the relations:
_ G(x,y) = 1 + Sum_{n>=1} x^n*y*G(x,y)^n/(1 - y*G(x,y)^(2*n)),
_ G(x,y) = 1 + Sum_{n>=1} y^n*x*G(x,y)^(2*n-1)/(1 - x*G(x,y)^(2*n-1)),
EXAMPLE
G.f.: A(x) = x + 4*x^2 + 31*x^3 + 291*x^4 + 3092*x^5 + 35839*x^6 +...
PROG
(PARI) {a(n)=local(A=x*y); for(i=1, n+1, A=1+sum(m=1, n+1, x^m*y*A^m/(1-y*A^(2*m)+x*O(x^n)+y*O(y^n)))); polcoeff(polcoeff(A, n+1, x), n, y)}
(PARI) {a(n)=local(A=x*y); for(i=1, n+1, A=1+sum(m=1, n+1, y^m*x*A^(2*m-1)/(1-x*A^(2*m-1)+x*O(x^n)+y*O(y^n)))); polcoeff(polcoeff(A, n, y), n+1, x)}
CROSSREFS
KEYWORD
nonn
AUTHOR
Paul D. Hanna, Jun 30 2011
STATUS
approved