|
|
A089151
|
|
Primes p such that 6*p - 7 and 6*p - 5 are twin primes.
|
|
2
|
|
|
2, 3, 11, 13, 19, 31, 41, 53, 59, 71, 73, 101, 139, 173, 193, 239, 269, 271, 313, 349, 353, 379, 433, 449, 521, 563, 613, 643, 683, 823, 829, 881, 941, 1051, 1061, 1093, 1223, 1249, 1259, 1373, 1399, 1439, 1471, 1571, 1621, 1669, 1723, 1811, 1861, 1951, 1973
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
6*19 - 7 = 107, 6*19 - 5 = 109; 107 and 109 are twin primes.
|
|
MATHEMATICA
|
Select[Range[2, 2000], And @@ PrimeQ[{#, 6#-5, 6#-7}] &] (* Amiram Eldar, Jan 15 2020 *)
Select[Prime[Range[300]], AllTrue[6#-{5, 7}, PrimeQ]&] (* Harvey P. Dale, Nov 18 2022 *)
|
|
PROG
|
(Magma) [p: p in PrimesUpTo(1000000)| IsPrime(6*p-5) and IsPrime(6*p-7)] // Vincenzo Librandi, Nov 16 2010
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|