OFFSET
0,4
FORMULA
G.f.: 1/G(0) where G(k) = 1 - q^(k+1) / G(k+1)^2. [Joerg Arndt, Jul 06 2013]
PROG
(PARI) {a(n)=local(A=1+x*O(x^n)); for(j=0, n-1, A=1/(1-x^(n-j)*A^2 +x*O(x^n))); polcoeff(A, n)}
(PARI) N = 66; q = 'q + O('q^N);
G(k) = if(k>N, 1, 1 - q^(k+1) / G(k+1)^2 );
gf = 1 / G(0);
Vec(gf) \\ Joerg Arndt, Jul 06 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Paul D. Hanna, Aug 20 2007
STATUS
approved