OFFSET
0,1
FORMULA
a(n) = Sum[Prime[i], {i, 2^n, 2^(n+1)-1}]
MATHEMATICA
a = Table[Sum[Prime[i], {i, 2^n, 2^(n + 1) - 1}], {n, 0, 24}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Roger L. Bagula, Mar 12 2005
STATUS
approved