A045348 Primes congruent to {0, 1, 2, 4} mod 5.
2, 5, 7, 11, 17, 19, 29, 31, 37, 41, 47, 59, 61, 67, 71, 79, 89, 97, 101, 107, 109, 127, 131, 137, 139, 149, 151, 157, 167, 179, 181, 191, 197, 199, 211, 227, 229, 239, 241, 251, 257, 269, 271, 277, 281, 307, 311
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[p: p in PrimesUpTo(400) | p mod 5 in [0, 1, 2, 4]]; // Vincenzo Librandi, Aug 10 2012
-
Mathematica
Select[Prime[Range[300]],MemberQ[{0,1, 2,4},Mod[#,5]]&] (* Vincenzo Librandi, Aug 10 2012 *)