|
|
A145065
|
|
a(n) = sum of primes <= n*10^9.
|
|
2
|
|
|
24739512092254535, 95673602693282040, 211169315361937456, 370412807102643725, 572840944428163514, 818062002011808625, 1105720106635140803, 1435543734762318281, 1807310307011831228, 2220822432581729238, 2675837181777714162, 3172247016440147644
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
a(1) = 2 + 3 + 5 + ... + 999999937 = 24739512092254535.
|
|
MATHEMATICA
|
k = 1; p = 2; s = 0; lst = {}; While[k < 10, While[p < 10^9*k, s = s + p; p = NextPrime@p]; k++; AppendTo[lst, s]; Print[{k - 1, s}]] (* Robert G. Wilson v, Jul 23 2010 *)
|
|
PROG
|
(PARI) A145065(n)=my(s=0); forprime(p=2, n*1e9, s+=p); s
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|