|
|
A136145
|
|
First of eight consecutive primes that are four sets of twin primes.
|
|
1
|
|
|
9419, 62969, 72221, 392261, 495569, 663569, 909287, 909299, 1006301, 1138367, 1159187, 1173539, 1322147, 2144477, 2168651, 2502341, 2596619, 2596637, 2668217, 3020999, 3215711, 3664679, 4890857, 5248079, 5261699, 5532269
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Could be called unrestricted prime octets.
|
|
LINKS
|
|
|
MATHEMATICA
|
lst={}; Do[p0=Prime[n]; p1=Prime[n+1]; p2=Prime[n+2]; p3=Prime[n+3]; p4=Prime[n+4]; p5=Prime[n+5]; p6=Prime[n+6]; p7=Prime[n+7]; If[p1-p0==p3-p2==p5-p4==p7-p6==2, AppendTo[lst, p0]], {n, 3*9!}]; lst (* Vladimir Joseph Stephan Orlovsky, Apr 02 2010 *)
Transpose[Select[Partition[Prime[Range[400000]], 8, 1], Union[ Differences/@ Partition[ #, 2]]=={{2}}&]][[1]] (* Harvey P. Dale, Nov 13 2015 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|