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 A242036 #20 Apr 26 2021 06:33:11
%S A242036 1,4,9,54,54,88,88,220,220,444,444,570,570,570,896,1510,1510,1510,
%T A242036 1510,1695,2065,2249,2249,2968,2968,2968,2968,3341,4561,4561,4561,
%U A242036 4942,4942,6471,6471,6471,7158,9202,9202,10915,10915,10915,10915,12312,12312,12312
%N A242036 Smallest k such that in the interval [1,k] in A242033 all odd primes <= prime(n) are present.
%t A242036 lpf[n_]:=lpf[n]=First[First[FactorInteger[n]]]; (* least prime factor *)
%t A242036 A242033=Map[lpf[#-1]&,Select[Range[6,100000,2],lpf[#-1]<lpf[#-3]&](*A245024*)];
%t A242036 pos={};NestWhile[#+1&,2,(AppendTo[pos,Position[A242033,Prime[#],1,1]];!Last[pos]=={})&];
%t A242036 A242036=Rest[FoldList[Max,-Infinity,Flatten[pos]]] (* _Peter J. C. Moses_, Aug 14 2014 *)
%Y A242036 Cf. A245024, A243937, A242033, A242034.
%K A242036 nonn
%O A242036 2,2
%A A242036 _Vladimir Shevelev_, Aug 12 2014
%E A242036 More terms from _Peter J. C. Moses_, Aug 12 2014