OFFSET
0,1
COMMENTS
See A060691 for the expansion of AGM(1,1-8x), where AGM denotes the arithmetic-geometric mean.
FORMULA
EXAMPLE
G.f.: A(x) = 2 - 4*x + 40*x^2 - 544*x^3 + 8540*x^4 - 145720*x^5 +...
2/A(x) = 1 + 2*x - 16*x^2 + 200*x^3 - 3006*x^4 + 49956*x^5 +...
F(x) = 1 + 2*x + 2*x^4 - 4*x^5 - 16*x^8 + 40*x^9 + 200*x^12 - 544*x^13 +...
where F(x) = 2/A(x^4) + x*A(x^4) is the g.f. of A158122.
PROG
(PARI) {a(n)=polcoeff(sqrt(x/serreverse(x/agm(1, 1-8*x +O(x^(4*n+2))))), 4*n+1)}
CROSSREFS
KEYWORD
sign
AUTHOR
Paul D. Hanna, Mar 14 2009
STATUS
approved