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 A042990 #16 Jun 26 2022 23:16:55 %S A042990 2,3,5,7,13,17,19,23,29,31,37,41,43,47,59,61,71,73,79,83,89,97,101, %T A042990 103,107,113,127,131,139,149,157,163,167,173,181,191,197,199,211,223, %U A042990 227,229,233,239,241,251,257,269,271,281,283,293,307,311,313,317 %N A042990 Primes not congruent to 4 (mod 7). %t A042990 Select[Prime[Range[80]], Mod[#, 7] !=4 &] (* _Vincenzo Librandi_, Apr 11 2016 *) %o A042990 (Magma) [p: p in PrimesUpTo(500) | not p mod 7 eq 4]; // _Vincenzo Librandi_, Apr 11 2016 %o A042990 (PARI) lista(nn) = forprime(p=2, nn, if(p%7 != 4, print1(p, ", "))); \\ _Altug Alkan_, Apr 11 2016 %Y A042990 Cf. A045471. %K A042990 nonn %O A042990 0,1 %A A042990 _N. J. A. Sloane_