login
A139406
Numbers k such that 8*k+1 and 8*k+5 are primes.
2
12, 24, 39, 57, 84, 96, 117, 126, 162, 186, 201, 234, 249, 267, 297, 309, 327, 336, 354, 357, 369, 402, 432, 441, 459, 462, 474, 516, 519, 564, 591, 621, 654, 696, 711, 717, 732, 777, 822, 942, 969, 984, 1011, 1029, 1086, 1092, 1116, 1167, 1179, 1272, 1341
OFFSET
1,1
LINKS
MATHEMATICA
a = {}; Do[If[PrimeQ[8 n + 1] && PrimeQ[8 n + 5], AppendTo[a, n]], {n, 1, 1000}]; a
Select[Range[1500], And@@PrimeQ[8 #+{1, 5}]&] (* Harvey P. Dale, Aug 14 2011 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Artur Jasinski, Apr 19 2008
STATUS
approved