|
|
A123083
|
|
Prime quartets of form k, k+6, k+12, k+18.
|
|
2
|
|
|
5, 11, 17, 23, 11, 17, 23, 29, 41, 47, 53, 59, 61, 67, 73, 79, 251, 257, 263, 269, 601, 607, 613, 619, 641, 647, 653, 659, 1091, 1097, 1103, 1109, 1481, 1487, 1493, 1499, 1601, 1607, 1613, 1619, 1741, 1747, 1753, 1759, 1861, 1867, 1873, 1879, 2371, 2377, 2383
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MAPLE
|
i:=1:for k from 1 to 5000 do if isprime(k) and isprime(k+6)and isprime(k+12)and isprime(k+18) then a[i]:=k:a[i+1]:=k+6:a[i+2]:=k+12:a[i+3]:=k+18:i:=i+4 fi od: seq(a[n], n=1..i-1);
|
|
MATHEMATICA
|
Select[Table[p+{0, 6, 12, 18}, {p, Prime[Range[400]]}], AllTrue[#, PrimeQ]&]//Flatten (* Harvey P. Dale, Sep 17 2023 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|