|
Search: id:A067374
|
|
|
| A067374 |
|
Integers expressible as the sum of (at least two) consecutive primes in at least 4 ways. |
|
+0 3
|
|
| 311, 863, 1164, 1320, 1650, 1854, 2856, 2867, 3198, 3264, 3754, 4200, 4920, 5100, 5770, 5999, 6504, 8152, 10134, 10320, 10536, 10649, 11058, 12294, 12438, 12762, 12820, 12954, 12990, 14369, 14699, 14826, 15329, 15610, 15762, 16199, 16277
(list; graph; listen)
|
|
|
OFFSET
|
0,1
|
|
|
LINKS
|
P. De Geest, WONplate 122
C. Rivera, Puzzle 46
|
|
EXAMPLE
|
E.g. 311 = (#3,101) (#5,53) (#7,31) (#11,11).
|
|
MATHEMATICA
|
Clear[lst, lst1, m, n, p, a, b] m=2*6!; lst={}; Do[p=Prime[a]; Do[p+=Prime[b]; If[p<Prime[m]*2+3, AppendTo[lst, p]], {b, a+1, m+2, 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, A054999.
Sequence in context: A142576 A025024 A067379 this_sequence A055000 A067380 A046495
Adjacent sequences: A067371 A067372 A067373 this_sequence A067375 A067376 A067377
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Patrick De Geest (pdg(AT)worldofnumbers.com), Feb 04 2002.
|
|
|
Search completed in 0.004 seconds
|