A179660 Sum of the primes < n*10^8.

279209790387276, 1075207199997334, 2367646772295462, 4146437503168147, 6404774487532576, 9137303389808024, 12340337443955708, 16010026481858292, 20143329357815162, 24739512092254535, 29795030058292249

Offset: 1

Author

Robert G. Wilson v, Jul 23 2010

Keywords

• nonn

Links

• Robert G. Wilson v, Table of n, a(n) for n = 1..250

Crossrefs

Cf. A046731, A178221, A179649, A145065.

Programs

Mathematica

k = 1; p = 2; s = 0; lst = {}; While[k < 12, While[p < 10^8*k, s = s + p; p = NextPrime@p]; k++; AppendTo[lst, s]; Print[{k - 1, s}]]