|
|
A178221
|
|
Sum of the primes < n*10^6.
|
|
4
|
|
|
37550402023, 142913828922, 312471072265, 544501644261, 838596693108, 1192390967254, 1607061425171, 2080483502248, 2613521583098, 3203324994356, 3853640069780, 4561368404019, 5326234575619, 6147376715980, 7026422648071
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
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
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|