A139407 Numbers k such that 8*k+3 and 8*k+7 are primes.
2, 5, 8, 20, 38, 47, 62, 80, 92, 107, 110, 113, 185, 197, 233, 260, 275, 293, 317, 332, 335, 338, 377, 395, 398, 488, 500, 653, 668, 722, 740, 755, 818, 863, 905, 950, 962, 965, 1052, 1055, 1067, 1097, 1100, 1193, 1202, 1217, 1223, 1235, 1262, 1280, 1283
Offset: 1
Keywords
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
a = {}; Do[If[PrimeQ[8 n + 3] && PrimeQ[8 n + 7], AppendTo[a, n]], {n, 1, 1000}]; a Select[Range[1500],And@@PrimeQ[8 # +{3,7}]&] (* Harvey P. Dale, Mar 24 2011 *)