|
Search: id:A067379
|
|
|
| A067379 |
|
Primes expressible as the sum of (at least two) consecutive primes in at least 3 ways. |
|
+0
2
|
|
| 311, 863, 1151, 1367, 1951, 2393, 2647, 2689, 3389, 4957, 5059, 5153, 7451, 7901, 8819, 10499, 10859, 10949, 12329, 12641, 12713, 13127, 13297, 14369, 14699, 14759, 14951, 15091, 15329, 15527, 16223, 16249, 16829, 18089, 18311, 18401
(list; graph; listen)
|
|
|
OFFSET
|
0,1
|
|
|
LINKS
|
P. De Geest, WONplate 122
C. Rivera, Puzzle 46
|
|
MATHEMATICA
|
m=2*6!; lst={}; Do[p=Prime[a]; Do[p+=Prime[b]; If[PrimeQ[p]&&p<Prime[m]*3+8, AppendTo[lst, p]], {b, a+1, m, 1}], {a, m}]; lst1=Sort[lst]; lst={}; Do[If[lst1[[n]]==lst1[[n+1]]&&lst1[[n]]==lst1[[n+2]], AppendTo[lst, lst1[[n]]]], {n, Length[lst1]-2}]; Union[lst] [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Aug 15 2009]
|
|
CROSSREFS
|
Cf. A050936, A067372-A067381.
Sequence in context: A104718 A142576 A025024 this_sequence A067374 A055000 A067380
Adjacent sequences: A067376 A067377 A067378 this_sequence A067380 A067381 A067382
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Patrick De Geest (pdg(AT)worldofnumbers.com), Feb 04 2002.
|
|
|
Search completed in 0.002 seconds
|
