|
Search: id:A107958
|
|
| |
|
| 1, 3, 11, 52, 331, 2949, 38069, 733817, 21670554, 1001901607, 73852354365, 8813580443406, 1725174170633694
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
COMMENT
|
Also terms at positions 2^(n+1) - 1 of A107947, where A107947 equals the first differences of A107957.
|
|
FORMULA
|
a(n) = A107957(2^n). a(n) = A107947(2^(n+1) - 1).
|
|
PROGRAM
|
(PARI) {a(n)=local(A=[1, 2]); for(i=1, n, B=vector(#A, k, polcoeff(Ser(A)/(1-x), k-1)+A[2^#binary(#A-1)]); A=concat(A, B); ); sum(k=1, 2^n, A[k])}
|
|
CROSSREFS
|
Cf. A107946, A107947, A107948, A107957.
Sequence in context: A058799 A054362 A129833 this_sequence A053557 A039302 A074512
Adjacent sequences: A107955 A107956 A107957 this_sequence A107959 A107960 A107961
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Paul D. Hanna (pauldhanna(AT)juno.com), May 29 2005
|
|
|
Search completed in 0.002 seconds
|
