|
Search: id:A091865
|
|
|
| A091865 |
|
G.f. satisfies A(x) = 1 + x*A(x)*A(x^2)*A(x^3)*...*A(x^n)*... |
|
+0
1
|
|
| 1, 1, 1, 2, 4, 8, 15, 30, 57, 111, 214, 415, 798, 1547, 2983, 5765, 11132, 21510, 41528, 80231, 154940, 299280, 578017, 1116450, 2156280, 4164827, 8044023, 15536655, 30007988, 57958900, 111943844, 216213363, 417602892, 806575889, 1557852990
(list; graph; listen)
|
|
|
OFFSET
|
0,4
|
|
|
FORMULA
|
G.f.: A(x) = 1+x*prod_{k>=1} A(x^k).
|
|
PROGRAM
|
(PARI) {a(n)=local(A); A=1+x; for(i=1, n, A=1+x*prod(k=1, n, subst(A, x, x^k))+x*O(x^n)); polcoeff(A, n, x)}
|
|
CROSSREFS
|
Sequence in context: A166861 A026023 A077596 this_sequence A065494 A134044 A079967
Adjacent sequences: A091862 A091863 A091864 this_sequence A091866 A091867 A091868
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Paul D. Hanna (pauldhanna(AT)juno.com), Feb 05 2004
|
|
|
Search completed in 0.002 seconds
|
