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 A045352 #21 Jun 26 2022 23:10:35
%S A045352 2,5,7,13,17,23,29,31,37,41,47,53,61,71,73,79,89,97,101,103,109,113,
%T A045352 127,137,149,151,157,167,173,181,191,193,197,199,223,229,233,239,241,
%U A045352 257,263,269,271,277,281,293,311
%N A045352 Primes congruent to {1, 2, 5, 7} mod 8.
%C A045352 Intersection of A000040 and A047482. - _Michel Marcus_, Sep 10 2014
%H A045352 Ray Chandler, <a href="/A045352/b045352.txt">Table of n, a(n) for n = 1..10000</a> (first 1000 terms from Vincenzo Librandi)
%p A045352 select(isprime, map(t -> op([1,2,5,7] + t*[8,8,8,8]), [$0..100])); # _Robert Israel_, Sep 12 2014
%t A045352 Select[Prime[Range[300]],MemberQ[{1, 2, 5, 7},Mod[#,8]]&] (* _Vincenzo Librandi_, Aug 07 2012 *)
%o A045352 (Magma) [ p: p in PrimesUpTo(1000) | p mod 8 in {1, 2, 5, 7} ]; // _Vincenzo Librandi_, Aug 07 2012
%o A045352 (PARI) isok(n)=isprime(n) && n%8%3 != 0 \\ _Edward Jiang_, Sep 09 2014
%K A045352 nonn,easy
%O A045352 1,1
%A A045352 _N. J. A. Sloane_