A128436 Primes p such that 2p - 3 and 2p - 1 are twin primes.

3, 7, 31, 37, 97, 157, 211, 331, 547, 577, 661, 727, 811, 937, 967, 1171, 1297, 1627, 2011, 2131, 2137, 2467, 2551, 2617, 3067, 3181, 3331, 3391, 3607, 4111, 4507, 4621, 4861, 5167, 5431, 5581, 5851, 6037, 6121, 6271, 6841, 6967, 7297, 7681, 7867, 8317

Offset: 1

Author

Zak Seidov, Mar 03 2007

Keywords

• nonn

Links

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

Crossrefs

Cf. A001097, A005382.

Programs

Magma

[ p: p in PrimesUpTo(9000) | IsPrime(2*p-3) and IsPrime(2*p-1)] // Vincenzo Librandi, Jan 29 2011

Mathematica

Select[Prime[Range[1000]], PrimeQ[2# - 1] && PrimeQ[2# - 3] &] (* Ray Chandler, May 11 2007 *)