A214890 Primes congruent to {2, 3} mod 17.
2, 3, 19, 37, 53, 71, 139, 173, 223, 241, 257, 359, 461, 479, 547, 563, 631, 683, 733, 751, 853, 887, 937, 971, 1039, 1091, 1193, 1277, 1447, 1481, 1499, 1549, 1567, 1583, 1601, 1669, 1753, 1787, 1873, 1889, 1907, 2111, 2161, 2179, 2213, 2281, 2297, 2383
Offset: 1
Keywords
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[p: p in PrimesUpTo(3000) | p mod 17 in [2, 3]];
-
Mathematica
Select[Prime[Range[3000]],MemberQ[{2,3},Mod[#,17]]&] Select[Flatten[(#+{2,3})&/@(17*Range[0,150])],PrimeQ] (* Harvey P. Dale, Aug 22 2020 *)