OFFSET
0,3
EXAMPLE
G.f.: A(x) = 1 + x + 4*x^2 + 16*x^3 + 77*x^4 + 389*x^5 + 2128*x^6 +...
where
A(x) = 1/((1 - x*A(x)^2) * (1 - x^2*A(x^2)^2) * (1 - x^3*A(x^3)^2) *...).
PROG
(PARI) {a(n)=local(A=1+x); for(i=1, n, A=1/prod(k=1, n, (1-x^k*subst(A, x, x^k+x*O(x^n))^2))); polcoeff(A, n)}
CROSSREFS
KEYWORD
nonn
AUTHOR
Paul D. Hanna, Sep 28 2011
STATUS
approved