A045410 Primes congruent to {3, 5} mod 6.
3, 5, 11, 17, 23, 29, 41, 47, 53, 59, 71, 83, 89, 101, 107, 113, 131, 137, 149, 167, 173, 179, 191, 197, 227, 233, 239, 251, 257, 263, 269, 281, 293, 311, 317, 347, 353, 359, 383, 389, 401, 419, 431, 443, 449, 461, 467, 479, 491, 503, 509, 521, 557, 563, 569
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[ p: p in PrimesUpTo(600) | p mod 6 in {3,5} ]; // Vincenzo Librandi, Aug 12 2012
-
Mathematica
Select[Prime[Range[200]],MemberQ[{3, 5},Mod[#,6]]&] (* Vincenzo Librandi, Aug 12 2012 *)
-
PARI
is(n)=(n%6==5 && isprime(n)) || n==3 \\ Charles R Greathouse IV, Jul 20 2015
Extensions
Extended by Charles R Greathouse IV, Mar 19 2010