|
| |
|
|
A088674
|
|
Eigenfunction of a sequence transformation.
|
|
1
| |
|
|
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; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
COMMENTS
| G.f. A(x) satisfies A(x^2) = (A(x/2)-1)/x -A(x/2)^2/2.
|
|
|
PROG
| (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 * A203434 A076170 A137775
Adjacent sequences: A088671 A088672 A088673 * A088675 A088676 A088677
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Michael Somos, Oct 04 2003
|
| |
|
|
