|
Search: id:A088674
|
|
|
| A088674 |
|
Eigenfunction of a sequence transformation. |
|
+0
2
|
|
| 1, 3, 6, 45, 126, 750, 2796, 19389, 75894, 449562, 2027796, 12211794, 57895596, 332787324, 1677545304, 9766642077, 50378641830, 286825948194, 1529968671492, 8729259097158, 47374697101572, 269062276076868, 1484430536591592
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
COMMENT
|
G.f. A(x) satisfies A(x^2) = (A(x/2)-1)/x -A(x/2)^2/2.
|
|
PROGRAM
|
(PARI) a(n)=local(A, m); if(n<0, 0, m=2; A=1+O(x); while(m<n+2, m*=2; A=subst(1/x-sqrt(2*(subst((1/2)/x-A, x, x^2)-1/x)), x, 2*x)); polcoeff(A, n))
|
|
CROSSREFS
|
Sequence in context: A092198 A133005 A009581 this_sequence A076170 A137775 A038050
Adjacent sequences: A088671 A088672 A088673 this_sequence A088675 A088676 A088677
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Michael Somos, Oct 04 2003
|
|
|
Search completed in 0.002 seconds
|
