A127464 Primes p such that 12p - 11 and 12p + 11 are also primes.

29, 101, 109, 151, 199, 211, 239, 251, 389, 491, 571, 631, 641, 809, 811, 1009, 1021, 1039, 1061, 1201, 1229, 1429, 1459, 1481, 1511, 1621, 1721, 2029, 2111, 2131, 2789, 2801, 2909, 2939, 2999, 3121, 3191, 3259, 3461, 3529, 3559, 3571, 3709, 3821, 4091

Offset: 1

Author

Zerinvary Lajos, Mar 31 2007

Keywords

• nonn

Examples

			101, 12*101 - 11 = 1201, and 12*101 + 11 = 1223 are all primes.
		

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Crossrefs

Subsequence of A157974.

Programs

Magma

[p: p in PrimesUpTo(5000)|IsPrime(12*p-11) and IsPrime(12*p+11)] // Vincenzo Librandi, Jan 30 2011

Mathematica

Select[Range[5000], PrimeQ[ # ] && PrimeQ[12# + 11] && PrimeQ[12# - 11] &]
Select[Prime[Range[600]],AllTrue[12#+{11,-11},PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Jan 12 2016 *)

Extensions

Name corrected by T. D. Noe, Jan 29 2011