A089151 Primes p such that 6*p - 7 and 6*p - 5 are twin primes.

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

Amiram Eldar, Table of n, a(n) for n = 1..10000

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

Cf. A001097, A001359, A006512, A060212.

Sequence in context: A167525 A038967 A001916 * A115669 A036956 A076503

Adjacent sequences: A089148 A089149 A089150 * A089152 A089153 A089154

Keyword

easy,nonn

Author

Pierre CAMI, Dec 06 2003

Status

approved