%I #7 Sep 08 2022 08:46:03
%S 2,3,19,41,59,79,97,173,191,193,211,229,269,307,383,401,419,421,439,
%T 457,571,647,743,761,839,857,877,953,971,991,1009,1103,1123,1181,1217,
%U 1237,1409,1427,1447,1483,1523,1559,1579,1597,1637,1693,1787,1789,1901,1979
%N Primes congruent to {0, 1, 2, 3} mod 19.
%H Vincenzo Librandi, <a href="/A215381/b215381.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Prime[Range[300]],MemberQ[{0, 1, 2,3},Mod[#,19]]&]
%o (Magma) [p: p in PrimesUpTo(2000) | p mod 19 in [0..3]];
%Y Cf. A000040, A042986, A045332.
%K nonn,easy
%O 1,1
%A _Vincenzo Librandi_, Aug 09 2012
|