A178221 - OEIS

%I #9 Feb 14 2018 15:03:25

%S 37550402023,142913828922,312471072265,544501644261,838596693108,

%T 1192390967254,1607061425171,2080483502248,2613521583098,

%U 3203324994356,3853640069780,4561368404019,5326234575619,6147376715980,7026422648071

%N Sum of the primes < n*10^6.

%H Robert G. Wilson v, <a href="/A178221/b178221.txt">Table of n, a(n) for n = 1..10000</a>

%t k = 1; p = 2; s = 0; lst = {}; While[k < 16, While[p < 10^6*k, s = s + p; p = NextPrime@ p]; k++; AppendTo[lst, s]]; lst

%Y Cf. A046731, A130739.

%K nonn

%O 1,1

%A _Robert G. Wilson v_, Jul 21 2010