A256397 Primes congruent to {17, 23} mod 24.
17, 23, 41, 47, 71, 89, 113, 137, 167, 191, 233, 239, 257, 263, 281, 311, 353, 359, 383, 401, 431, 449, 479, 503, 521, 569, 593, 599, 617, 641, 647, 719, 743, 761, 809, 839, 857, 863, 881, 887, 911, 929, 953, 977, 983, 1031, 1049, 1097, 1103, 1151, 1193
Offset: 1
Keywords
Programs
-
Magma
[p: p in PrimesUpTo(1193) | p mod 24 in {17, 23}];
-
Mathematica
Select[Prime@Range[196], MemberQ[{17, 23}, Mod[#, 24]] &]
-
PARI
select(p->my(k=p%24); k==17||k==23, primes(1000)) \\ Charles R Greathouse IV, Jun 03 2015
Comments