OFFSET
0,3
COMMENTS
See page 12-15 of link.
LINKS
FORMULA
G.f. A(x) satisfies A(x)^6+(-2*x+3)*A(x)^4+(-2*x-1)*A(x)^3+(x^2-3*x+3)*A(x)^2+(2*x^2-2*x-1)*A(x)+x^2+x=0; a(n+1)/a(n) ->7.346751...
PROG
(PARI) a(n)=local(A); if(n<1, 0, A=x+O(x^2); for(m=2, n, A=Pol(A)+x*O(x^m); A=A^6+(-2*x+3)*A^4+(-2*x-1)*A^3+(x^2-3*x+3)*A^2+(2*x^2-2*x)*A+x^2+x); polcoeff(A, n))
CROSSREFS
KEYWORD
nonn
AUTHOR
Benoit Cloitre, May 24 2003
STATUS
approved