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,1

Links

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

Example

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

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 *)

Prog

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

Crossrefs

Subsequence of A157974.

Sequence in context: A240954 A087641 A161665 * A318959 A142109 A069472

Adjacent sequences: A127461 A127462 A127463 * A127465 A127466 A127467

Keyword

nonn

Author

Zerinvary Lajos, Mar 31 2007

Extensions

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

Status

approved