A215381 Primes congruent to {0, 1, 2, 3} mod 19.
2, 3, 19, 41, 59, 79, 97, 173, 191, 193, 211, 229, 269, 307, 383, 401, 419, 421, 439, 457, 571, 647, 743, 761, 839, 857, 877, 953, 971, 991, 1009, 1103, 1123, 1181, 1217, 1237, 1409, 1427, 1447, 1483, 1523, 1559, 1579, 1597, 1637, 1693, 1787, 1789, 1901, 1979
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[p: p in PrimesUpTo(2000) | p mod 19 in [0..3]];
-
Mathematica
Select[Prime[Range[300]],MemberQ[{0, 1, 2,3},Mod[#,19]]&]