|
Search: id:A075853
|
|
|
| A075853 |
|
G.f. satisfies A(x) = 1 + x (1+sum_{n=0..inf} [xA(x)]^(2^n)). |
|
+0
2
|
|
| 1, 1, 1, 2, 3, 6, 13, 27, 59, 131, 295, 684, 1609, 3829, 9203, 22262, 54179, 132565, 325823, 804108, 1991729, 4949794, 12339483, 30851429, 77347913, 194422788, 489892473, 1237207811, 3131186993, 7940340037, 20173254851, 51341234278
(list; graph; listen)
|
|
|
OFFSET
|
0,4
|
|
|
PROGRAM
|
(PARI) a(n)=local(A, m); if(n<3, n>=0, A=1+x*O(x^n); m=1+ceil(log(n)/log(2)); for(k=1, n, A*=x; A=1+x*sum(i=0, m, A^2^i, 1)); polcoeff(A, n))
|
|
CROSSREFS
|
Sequence in context: A127601 A030038 A030040 this_sequence A132045 A032143 A032160
Adjacent sequences: A075850 A075851 A075852 this_sequence A075854 A075855 A075856
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Paul D. Hanna (pauldhanna(AT)juno.com), Oct 15 2002
|
|
EXTENSIONS
|
Definition corrected by Michael Somos, Oct 29, 2002
|
|
|
Search completed in 0.002 seconds
|
