|
Search: id:A113299
|
|
|
| A113299 |
|
Expansion of solution to a functional equation. |
|
+0 1
|
|
| 1, 3, 10, 33, 110, 366, 1219, 4059, 13518, 45018, 149924, 499290, 1662787, 5537577, 18441799, 61416729, 204536183, 681166986, 2268490929, 7554756990, 25159612832, 83789077212, 279042826065, 929296530558, 3094836925438
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
FORMULA
|
G.f. A(x) = x/((1-B(x))^2-x) where B(x) = g.f. for A001190.
G.f. A(x) satisfies 0=f(A(x), A(x^2)) where f(u, v)=v(1+6u)-u^2(1-8v).
|
|
PROGRAM
|
(PARI) {a(n)=local(A, m); if(n<1, 0, A=1+O(x); m=1; while(m<n, m*=2; A=x*subst(A, x, x^2); A=sqrt(A/(1-2*A)/x)); A*=x*A; A/=(1-A); polcoeff(A, n))}
|
|
CROSSREFS
|
Sequence in context: A018920 A006190 A020704 this_sequence A126931 A071722 A058987
Adjacent sequences: A113296 A113297 A113298 this_sequence A113300 A113301 A113302
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Michael Somos, Oct 24 2005
|
|
|
Search completed in 0.002 seconds
|