login
A112044
Let b(0)=1/2, b(n) = (b(n-1)+Prime[n])/2; sequence gives 2^(n+1)*b(n).
0
1, 5, 17, 57, 169, 521, 1353, 3529, 8393, 20169, 49865, 113353, 264905, 600777, 1305289, 2845385, 6318793, 14052041, 30042825, 65170121, 139619017, 292711113, 624061129, 1320315593, 2813487817, 6068267721, 12846262985, 26670688969
OFFSET
0,2
COMMENTS
An integer sequence as a power of 2 representation of the running average of the primes (with 1 as the zeroth element).
MATHEMATICA
a[0] = 1/2; a[n_] := a[n] = (a[n - 1] + Prime[n])/2; Table[2^(n + 1)*a[n], {n, 0, 27}]
CROSSREFS
Sequence in context: A146271 A145371 A347750 * A027030 A033538 A027093
KEYWORD
nonn
AUTHOR
Roger L. Bagula, Nov 28 2005
EXTENSIONS
More terms from Robert G. Wilson v, Nov 29 2005
STATUS
approved