login
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
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
Pierre CAMI, Dec 06 2003
STATUS
approved