A092074 Primes congruent to 3 mod 17.
3, 37, 71, 139, 173, 241, 479, 547, 683, 751, 853, 887, 1091, 1193, 1499, 1567, 1601, 1669, 1873, 1907, 2111, 2179, 2213, 2281, 2383, 2417, 2621, 2689, 2791, 2927, 3301, 3539, 3607, 3709, 3947, 4049, 4219, 4253, 4423, 4457, 4729, 4831, 4933, 4967, 5171
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
- Chris Caldwell, Prime test.
Crossrefs
Cf. A129484.
Programs
-
Magma
[ p: p in PrimesUpTo(10000) | p mod 17 eq 3 ]; // Vincenzo Librandi, Apr 08 2011
-
Mathematica
Select[ Range[3,5000,17], PrimeQ] (* Vladimir Joseph Stephan Orlovsky, Apr 03 2011 *) Select[Prime[Range[700]],Mod[#,17]==3&] (* Harvey P. Dale, Dec 03 2021 *)
-
PARI
forprime(i=1,6000,if(Mod(i,17)==3,print1(i,",")))
Extensions
More terms from Mohammed Bouayoun (bouyao(AT)wanadoo.fr) and Ray Chandler, Mar 30 2004
Comments