OFFSET
0,3
FORMULA
Limit a(n+1)/a(n) = -5.502856676359094846755190514140489974645...
EXAMPLE
A(x) = 1 + x - 2*x^2 + 7*x^3 - 27*x^4 + 114*x^5 - 506*x^6 +-...
A(x)^6 = 1 + 6*x + 3*x^2 + 2*x^3 + 3*x^4 + 3*x^8 + 4*x^9 +...
A106224 = {1,6,3,2,3,0,0,0,3,4,3,0,0,0,3,2,0,0,0,0,3,2,...}.
PROG
(PARI) {a(n)=local(A=1+6*x); if(n==0, 1, for(j=1, n, for(k=0, 5, t=polcoeff((A+k*x^j+x*O(x^j))^(1/6), j); if(denominator(t)==1, A=A+k*x^j; break))); return(polcoeff((A+x*O(x^n))^(1/6), n)))}
CROSSREFS
KEYWORD
sign,base
AUTHOR
Paul D. Hanna, May 01 2005
STATUS
approved