%I #19 Sep 08 2022 08:45:35
%S 2,71,163,347,439,577,761,853,991,1129,1451,1543,2003,2141,2371,2417,
%T 2647,2693,2969,3061,3613,3659,3797,3889,4027,4073,4211,4349,4441,
%U 4993,5039,5407,5591,5683,5821,5867,6143,6373,6833,6971,7109,7247,7477,7523,7753
%N Primes congruent to 2 mod 23.
%H Vincenzo Librandi, <a href="/A141908/b141908.txt">Table of n, a(n) for n = 1..1000</a>
%F {2} UNION A142344. - _R. J. Mathar_, Jul 20 2008
%t Select[Range[2,8000,23],PrimeQ] (* _Vladimir Joseph Stephan Orlovsky_, Apr 05 2011 *)
%o (Magma) [p: p in PrimesUpTo(8000) | p mod 23 eq 2 ]; // _Vincenzo Librandi_, Aug 16 2012
%o (PARI) is(n)=isprime(n) && n%23==2 \\ _Charles R Greathouse IV_, Jul 01 2016
%Y Cf. A000040, A040984.
%K nonn,easy
%O 1,1
%A _N. J. A. Sloane_, Jul 11 2008