|
| |
|
|
A013918
|
|
Numbers n such that n is prime and is equal to the sum of the first k primes for some k.
|
|
28
| |
|
|
2, 5, 17, 41, 197, 281, 7699, 8893, 22039, 24133, 25237, 28697, 32353, 37561, 38921, 43201, 44683, 55837, 61027, 66463, 70241, 86453, 102001, 109147, 116533, 119069, 121631, 129419, 132059, 263171, 287137, 325019, 329401, 333821, 338279, 342761
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
LINKS
| T. D. Noe, Table of n, a(n) for n=1..10000
|
|
|
FORMULA
| a(n) = A007504(A013916(n))
Intersection of A000040 and A007504. - David W. Wilson, May 11 2007
|
|
|
MAPLE
| P:=proc(n) local i, j; j:=2; for i from 2 by 1 to n do j:=j+ithprime(i); if isprime(j) then print(j); fi; od; end: P(1000); - Paolo P. Lava (paoloplava(AT)gmail.com), May 05 2006
|
|
|
MATHEMATICA
| Select[Accumulate[Prime[Range[1000]]], PrimeQ] [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Sep 01 2008]
|
|
|
PROG
| (PARI) n=0; forprime(k=2, 2300, n=n+k; if(isprime(n), print(n))) [From Michael B. Porter (michael_b_porter(AT)yahoo.com), Jan 29 2010]
|
|
|
CROSSREFS
| Cf. A013916, A013917.
Cf. A189153 (number of these primes < 10^n).
Sequence in context: A122566 A118500 A080898 * A007351 A076076 A136194
Adjacent sequences: A013915 A013916 A013917 * A013919 A013920 A013921
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| N. J. A. Sloane (njas(AT)research.att.com), Renaud Lifchitz (100637.64(AT)CompuServe.COM)
|
|
|
EXTENSIONS
| More terms from David W. Wilson (davidwwilson(AT)comcast.net)
|
| |
|
|
