%I #16 Sep 08 2022 08:44:56
%S 5,7,13,17,23,29,31,37,41,47,53,61,71,73,79,89,97,101,103,109,113,127,
%T 137,149,151,157,167,173,181,191,193,197,199,223,229,233,239,241,257,
%U 263,269,271,277,281,293,311,313
%N Primes congruent to {1, 5, 7} mod 8.
%H Ray Chandler, <a href="/A045442/b045442.txt">Table of n, a(n) for n = 1..10000</a> (first 1000 terms from Vincenzo Librandi)
%t Select[Prime[Range[100]],MemberQ[{1,5,7},Mod[#,8]]&] (* _Harvey P. Dale_, Mar 25 2012 *)
%o (Magma)[ p: p in PrimesUpTo(500) | p mod 8 in {1, 5, 7} ]; // _Vincenzo Librandi_, Aug 13 2012
%Y Cf. A000040.
%K nonn,easy
%O 1,1
%A _N. J. A. Sloane_