A106064 Primes p such that 1*p + 16 and 16*p + 1 are primes.

7, 37, 97, 151, 163, 181, 331, 337, 487, 547, 571, 643, 727, 757, 967, 1033, 1087, 1093, 1303, 1423, 1471, 1567, 1831, 1987, 2083, 2113, 2221, 2251, 2281, 2671, 2683, 3121, 3187, 3607, 3847, 3931, 4111, 4201, 4447, 4663, 4993, 5023, 5791, 6073, 6343, 6553

Offset: 1

Author

Zak Seidov, May 07 2005

Keywords

• nonn

Crossrefs

Intersection of A049488 and A155943. - Michel Marcus, Jan 20 2018

Programs

Magma

[p: p in PrimesUpTo(10000)| IsPrime(p+16) and IsPrime(16*p+1)]; // Vincenzo Librandi, Nov 13 2010

Mathematica

Select[Prime[Range[220]], PrimeQ[16#+1]&&PrimeQ[1#+16]&]