A049438 p, p+6 and p+8 are all primes (A046138) but p+2 is not.
23, 53, 131, 173, 233, 263, 563, 593, 653, 1013, 1223, 1283, 1601, 1613, 2333, 2543, 2963, 3323, 3533, 3761, 3911, 3923, 4013, 4211, 4253, 4643, 4793, 5003, 5273, 5471, 5843, 5861, 6263, 6353, 6563, 6653, 6863, 7121, 7451, 7481, 7541, 7583
Offset: 1
Links
- R. J. Mathar, Table of n, a(n) for n = 1..1000
Crossrefs
Programs
-
Mathematica
Select[Prime@ Range[10^3], MatchQ[Boole@ PrimeQ@ {# + 2, # + 6, # + 8}, {0, 1, 1}] &] (* Michael De Vlieger, Feb 05 2017 *)
-
PARI
isok(p) = isprime(p) && !isprime(p+2) && isprime(p+6) && isprime(p+8); \\ Michel Marcus, Dec 13 2013