OFFSET
1,1
LINKS
FORMULA
A084143(a(n)) > 4. - Ray Chandler, Sep 20 2023
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
Patrick De Geest, Feb 04 2002
EXTENSIONS
Offset and a(35) corrected by Donovan Johnson, Nov 14 2013
STATUS
approved