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 A073771 #9 Mar 24 2024 04:25:44 %S A073771 4,36,48,240,720,1680,15120,20160,45360,50400,221760,498960,554400, %T A073771 665280,2882880,6486480,14414400,17297280,32432400,43243200,110270160, %U A073771 245044800,294053760,735134400,2095133040,2205403200,4655851200 %N A073771 Highly composite numbers k such that 2*k is not a highly composite number. %C A073771 The terms were determined by means of A. Flammenkamp's list (cf. Links); the terms <= 17297280 were confirmed by a PARI program. %H A073771 Achim Flammenkamp <a href="http://wwwhomes.uni-bielefeld.de/achim/highly.html">Highly Composite Numbers</a>. %e A073771 36 = A002182(7) is a term since 2*36 = 72 is not highly composite. %o A073771 (PARI) {a=1; v=[1]; for(k=1,40000000,b=numdiv(k); if(b>a,a=b; v=concat(v,k); while(2*v[1]<=k,if(2*v[1]<k,print1(v[1],",")); v=vecextract(v,"2.."))))} %Y A073771 Cf. A002182, A072938. %K A073771 nonn %O A073771 1,1 %A A073771 _Klaus Brockhaus_, Aug 19 2002