A156107 Primes p such that p + 144 is also prime.

5, 7, 13, 19, 23, 29, 37, 47, 53, 67, 79, 83, 89, 97, 107, 113, 127, 137, 139, 149, 163, 167, 173, 193, 223, 229, 239, 257, 277, 313, 317, 347, 359, 379, 397, 419, 433, 443, 449, 457, 463, 487, 499, 503, 509, 547, 557, 599, 607, 613, 617, 643, 653, 677, 683

Offset: 1

Author

Vincenzo Librandi, Feb 08 2009

Keywords

• nonn
• easy

Links

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

Crossrefs

Cf. A156124.

Programs

Magma

[p: p in PrimesUpTo(1000)|IsPrime(p + 144)]; // Vincenzo Librandi, Oct 31 2012

Mathematica

Select[Prime[Range[1000]], PrimeQ[(# + 144)]&] (* Vincenzo Librandi, Oct 31 2012 *)

Extensions

Inserted 13, 137, 509 - R. J. Mathar, Feb 19 2009