|
%I #7 Sep 08 2022 08:46:03
%S 2,3,5,23,41,43,59,61,79,97,137,157,173,191,193,211,229,233,251,269,
%T 271,307,347,383,401,419,421,439,457,461,479,499,571,593,613,631,647,
%U 727,743,761,821,839,857,859,877,953,971,991,1009,1031,1049,1069
%N Primes congruent to {1, 2, 3, 4, 5} mod 19.
%H Vincenzo Librandi, <a href="/A215313/b215313.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Prime[Range[500]], MemberQ[{1, 2, 3, 4, 5}, Mod[#, 19]] &]
%o (Magma) [p: p in PrimesUpTo(1300) | p mod 19 in [1..5]];
%Y Cf. A000040, A044042.
%K nonn,easy
%O 1,1
%A _Vincenzo Librandi_, Aug 08 2012
|
