|
Search: id:A093113
|
|
|
| A093113 |
|
Coefficients of the solution to a functional equation. |
|
+0
1
|
|
| 1, 2, 6, 16, 62, 192, 652, 2048, 9270, 31744, 116948, 393216, 1533868, 5341184, 19445016, 67108864, 332958758, 1215037440, 4711687300, 16642998272, 67697833092, 245257732096, 923984441000, 3298534883328, 13952454631996
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
G.f. A(x) satisfies A(4x^2)=A(x)+A(-x)=-4A(x)A(-x). Also A(4x^2)=4A(x)^2/(1+4A(x)).
|
|
PROGRAM
|
(PARI) a(n)=local(A, m); if(n<1, 0, A=x+O(x^2); m=1; while(m<=n, m*=2; A=subst(A, x, x^2); A=A/2+sqrt(A^2/4+A)); polcoeff(A, n)*4^(n-1))
|
|
CROSSREFS
|
Sequence in context: A131385 A027742 A033301 this_sequence A150030 A150031 A121753
Adjacent sequences: A093110 A093111 A093112 this_sequence A093114 A093115 A093116
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Michael Somos, Mar 20 2004
|
|
|
Search completed in 0.002 seconds
|
