|
|
A098412
|
|
Greatest members p of prime triples (p-6, p-4, p).
|
|
10
|
|
|
11, 17, 23, 47, 107, 113, 197, 233, 317, 353, 467, 647, 827, 863, 887, 1097, 1283, 1307, 1433, 1487, 1493, 1613, 1877, 2003, 2087, 2243, 2273, 2663, 2693, 3257, 3467, 3533, 3677, 3923, 4007, 4133, 4523, 4643, 4793, 4937, 4973, 5237, 5483, 5507, 5657, 6203
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MAPLE
|
K:=10^7: # to get all terms <= K.
for n from 1 by 2 to K do; if isprime(n-6) and isprime(n-4) and isprime(n) then print(n) else fi; od; # Muniru A Asiru, Aug 06 2017
|
|
MATHEMATICA
|
Select[Partition[Prime[Range[1000]], 3, 1], Differences[#]=={2, 4}&][[All, 3]] (* Harvey P. Dale, Sep 23 2017 *)
|
|
PROG
|
(Magma)[p: p in PrimesUpTo(6500)|IsPrime(p) and IsPrime(p-6) and IsPrime(p-4)]; // Vincenzo Librandi, Dec 26 2010
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|