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 A105792 #12 Dec 10 2024 05:41:32
%S A105792 2,3,7,13,19,23,31,37,43,47,53,61,67,73,79,83,89,97,103,109,113,127,
%T A105792 131,139,151,157,163,167,173,181,193,199,211,223,229,233,241,251,257,
%U A105792 263,271,277,283,293,307,313,317,331,337,349,353,359,367,373,379,383,389
%N A105792 Largest prime <= numbers congruent (2,4) mod 6 (duplicates removed).
%C A105792 Except for the first terms, largest prime p is at least < two numbers congruent (2,4) mod 6.
%e A105792 7 is in the sequence because 7 is the largest prime < 8 which is a number congruent (2,4) mod 6.
%t A105792 pp[n_] := Block[{k = n},While[ ! PrimeQ[k], k-- ];k];Union[pp /@ Select[Range[400], MemberQ[{2, 4}, Mod[ #, 6]] &]] (* _Ray Chandler_, Oct 17 2006 *)
%t A105792 Union[Abs[NextPrime[#,-1]&/@Select[Range[400],MemberQ[{2,4}, Mod[ #,6]]&]]] (* _Harvey P. Dale_, May 17 2012 *)
%Y A105792 Cf. A105399, A105575.
%K A105792 easy,nonn
%O A105792 1,1
%A A105792 _Giovanni Teofilatto_, May 05 2005
%E A105792 Extended by _Ray Chandler_, Oct 17 2006