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,1

Links

Amiram Eldar, Table of n, a(n) for n = 1..10000

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 *)

Crossrefs

Cf. A125821, A125822, A139402, A139404, A139405, A139406.

Sequence in context: A104721 A245191 A281104 * A107384 A205596 A092446

Adjacent sequences: A139404 A139405 A139406 * A139408 A139409 A139410

Keyword

nonn

Author

Artur Jasinski, Apr 19 2008

Status

approved