|
|
A067375
|
|
Integers expressible as the sum of (at least two) consecutive primes in at least 5 ways.
|
|
2
|
|
|
16277, 20272, 25416, 28500, 34421, 41074, 45101, 46660, 50560, 53424, 59068, 68787, 70104, 70692, 71548, 78756, 85433, 85481, 88453, 94350, 98881, 105827, 117907, 120151, 121847, 125952, 130638, 130789, 131420, 132539, 133367, 134376, 135918, 139853, 158810
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
E.g. 16277 = (#7,2297) (#11,1451) (#13,1213) (#35,359) (#37,331).
|
|
MATHEMATICA
|
t={}; Do[p=Prime[m]; Do[p=p+Prime[n]; If[p<200000, AppendTo[t, p]], {n, m+1, 7001}], {m, 1, 7000}]; t=Sort@t; f5[l_]:=Module[{t={}}, Do[If[l[[n]]==l[[n+4]], AppendTo[t, l[[n]]]], {n, Length[l]-4}]; t]; Union@f5[t] (* Vladimir Joseph Stephan Orlovsky, Jan 30 2012 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|