A129484 Primes of the form 17k + 1.
103, 137, 239, 307, 409, 443, 613, 647, 919, 953, 1021, 1123, 1259, 1327, 1361, 1429, 1531, 1667, 1871, 1973, 2143, 2347, 2381, 2551, 2687, 2789, 2857, 3061, 3163, 3299, 3469, 3571, 3673, 3877, 3911, 4013, 4217, 4421, 4523, 4591, 4931, 4999, 5101, 5237
Offset: 1
Links
- Daniel Starodubtsev, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
Magma
[n: n in [1..5000 by 17] | IsPrime(n)] ; // Vincenzo Librandi, Apr 04 2011
-
Mathematica
Select[Range[1,5000,17],PrimeQ[#]&] (* Vladimir Joseph Stephan Orlovsky, Apr 03 2011 *)
-
PARI
cicadayear(n) = forstep(x=1,n,17,if(isprime(x),print1(x",")))