A139385 Primes p such that p, p+4 and p+12 are consecutive primes.
397, 487, 739, 757, 907, 1567, 1999, 2239, 2269, 2659, 3037, 3217, 3697, 3877, 5167, 5569, 5689, 5779, 6199, 6217, 6469, 6829, 7669, 7687, 8089, 8167, 8677, 8929, 10099, 10627, 11239, 11317, 11677, 12277, 12409, 13147, 13159, 14407, 14419, 14767
Offset: 1
Keywords
Links
- Zak Seidov, Table of n, a(n) for n = 1..1000.
Crossrefs
Cf. A046137.
Programs
-
Mathematica
Select[Partition[Prime[Range[2000]],3,1],Differences[#]=={4,8}&][[All,1]] (* Harvey P. Dale, Apr 02 2017 *)
-
PARI
isok(p) = isprime(p) && (nextprime(p+1) == p+4) && (nextprime(p+5) == p+12); \\ Michel Marcus, Oct 13 2013
Comments