|
| |
|
|
A067380
|
|
Primes expressible as the sum of (at least two) consecutive primes in at least 4 ways.
|
|
2
| |
|
|
311, 863, 14369, 14699, 15329, 19717, 29033, 34421, 36467, 37607, 40433, 42463, 48731, 49253, 49499, 55813, 67141, 70429, 76423, 78791, 85703, 90011, 94559, 97159, 98411, 109159, 110359, 110527, 125821, 130513, 134921, 141587, 147031
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,1
|
|
|
LINKS
| P. De Geest, WONplate 122
C. Rivera, Puzzle 46
|
|
|
MATHEMATICA
| m=7!; 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]]&&lst1[[n]]==lst1[[n+3]], AppendTo[lst, lst1[[n]]]], {n, Length[lst1]-3}]; Union[lst] [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Aug 15 2009]
|
|
|
CROSSREFS
| Cf. A050936, A067372-A067381.
Sequence in context: A067379 A067374 A055000 * A046495 A061329 A082862
Adjacent sequences: A067377 A067378 A067379 * A067381 A067382 A067383
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Patrick De Geest (pdg(AT)worldofnumbers.com), Feb 04 2002.
|
| |
|
|
