%I #6 Sep 08 2022 08:46:11
%S 13,23,43,73,83,113,163,173,193,223,233,263,283,293,313,373,383,433,
%T 443,463,523,563,593,613,643,673,683,733,743,773,823,863,883,983,1013,
%U 1033,1063,1093,1123,1163,1193,1213,1223,1283,1373,1423,1433,1483,1493
%N Primes congruent to {8, 13, 18, 23} mod 25.
%C Union of A141933, A141937, A141941, and A141945.
%C These primes cannot be written as the sum of a triangular number and a square.
%t Select[Prime@Range[283], MemberQ[{8, 13, 18, 23}, Mod[#, 25]] &]
%o (Magma) [p: p in PrimesUpTo(1493) | p mod 25 in {8, 13, 18, 23}];
%Y Cf. A141933, A141937, A141941, A141945.
%K nonn
%O 1,1
%A _Arkadiusz Wesolowski_, Mar 18 2015