A158018 Primes p such that (p - 1)/12 is also prime.

37, 61, 157, 229, 277, 349, 373, 709, 733, 853, 877, 997, 1069, 1213, 1237, 1669, 1789, 2293, 2389, 2677, 2749, 2797, 3229, 3253, 3373, 3517, 3733, 4549, 4597, 4813, 4909, 5197, 5557, 5749, 6037, 6277, 6829, 7213, 7573, 7717, 7933, 8293, 8629, 9013, 9133

Offset: 1

Author

Roger L. Bagula, Mar 11 2009

Keywords

• nonn
• easy

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A005385, A090866, A051644, A055781

Programs

Mathematica

Flatten[Table[If[PrimeQ[n] && PrimeQ[(n - 1)/12], n, {}], {n, 1, 10000}]]
Select[Prime[Range[1500]], PrimeQ[(# - 1) / 12]&] (* Vincenzo Librandi, Apr 14 2013 *)

Formula

a(n)=12*A075704(n)+1. [From R. J. Mathar, Mar 15 2009]

Extensions

Definition slightly rephrased - The Assoc. Eds. of the OEIS, Aug 30 2010