This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A228093 #59 Sep 08 2022 08:46:05
%S A228093 5,509,1013,3533,6053,8069,8573,10589,11093,11597,12101,13109,13613,
%T A228093 14621,15629,18149,19157,19661,23189,24197,26717,28229,29741,31253,
%U A228093 32261,33773,34781,36293,39317,39821,40829,41333,43853,44357,45869,46877,47381,50909,51413
%N A228093 Primes congruent to 5 (mod 504).
%p A228093 select(isprime, [5+504*i$i=0..200])[]; # _Alois P. Heinz_, Jan 01 2022
%t A228093 Select[Prime@Range[6000], MemberQ[{5}, Mod[#, 504]] &] (* _Vincenzo Librandi_, Apr 05 2015 *)
%o A228093 (Magma) [p: p in PrimesUpTo(105500) | p mod 504 eq 5 ];
%K A228093 nonn,easy
%O A228093 1,1
%A A228093 _Joshua S.M. Weiner_, Aug 09 2013
%E A228093 Missing a(30)=39821 inserted by _Georg Fischer_, Jan 01 2022