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 A045461 #24 Sep 08 2022 08:44:56 %S A045461 7,11,29,43,53,67,71,109,113,127,137,151,179,193,197,211,239,263,277, %T A045461 281,337,347,379,389,421,431,449,463,487,491,547,557,571,599,613,617, %U A045461 631,641,659,673,683,701,739,743 %N A045461 Primes congruent to {0, 1, 4} mod 7. %C A045461 The same as A045469 but without the initial 7 (the only prime congruent to 0 mod 7). %H A045461 Vincenzo Librandi, <a href="/A045461/b045461.txt">Table of n, a(n) for n = 1..3000</a> %F A045461 a(n) ~ 3 n log n. [_Charles R Greathouse IV_, Feb 20 2012] %t A045461 Select[Prime[Range[120]], MemberQ[{0, 1, 4}, Mod[#, 7]] &] (* From Alonso del Arte based on Orlovsky's program for A042992, Feb 18 2012 *) %o A045461 (PARI) forprime(p=2,1e3,if((n->n<2||n==4)(p%7),print1(p", "))) \\ _Charles R Greathouse IV_, Feb 20 2012 %o A045461 (Magma) [ p: p in PrimesUpTo(1000) | p mod 7 in {0, 1, 4} ]; // _Vincenzo Librandi_, Aug 13 2012 %Y A045461 Cf. A045312 (complement). %K A045461 nonn,easy %O A045461 1,1 %A A045461 _N. J. A. Sloane_