A156112 - OEIS

A156112

Primes p such that p+36 and p+72 are both prime.

7, 11, 17, 31, 37, 67, 101, 127, 157, 191, 197, 241, 277, 281, 311, 317, 337, 347, 431, 521, 541, 571, 647, 751, 787, 911, 941, 947, 977, 997, 1051, 1151, 1187, 1451, 1487, 1621, 1627, 1877, 2017, 2027, 2237, 2311, 2467, 2521, 2621, 2647, 2657, 2677, 2731

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

COMMENTS

A156105 INTERSECT A156104. [R. J. Mathar, Feb 09 2009]

LINKS

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

MATHEMATICA

Select[Prime[Range[3000]], And @@ PrimeQ[{# + 36, # + 72}]&] (* Vincenzo Librandi, Oct 31 2012 *)

Select[Prime[Range[3000]], AllTrue[#+{36, 72}, PrimeQ]&] (* Harvey P. Dale, Jul 12 2023 *)

PROG

(Magma) [p: p in PrimesUpTo(3000)|IsPrime(p + 36) and IsPrime (p + 72)]; // Vincenzo Librandi, Oct 31 2012