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 A328519 #11 Feb 18 2020 10:51:02 %S A328519 1,2,4,6,12,24,36,60,48,120,180,240,360,840,1260,720,1680,2520,5040, %T A328519 7560,27720,10080,15120,25200,55440,83160,20160,45360,50400,110880, %U A328519 166320,277200,720720,1081080,221760,332640,498960,554400,1441440,2162160,3603600,665280,2882880 %N A328519 Terms in A002182 sorted by their Omega values (their number of prime factors counted with multiplicity). %t A328519 With[{s = Array[DivisorSigma[0, #] &, 3*10^6]}, SortBy[#, PrimeOmega] &@ Map[FirstPosition[s, #][[1]] &, Union@ FoldList[Max, s]]] %t A328519 (* or, using the b-file at A002182: *) %t A328519 Take[SortBy[Import["https://oeis.org/b002182.txt", "Data"][[All, -1]], PrimeOmega], 43] (* _Michael De Vlieger_, Jan 19 2020 *) %o A328519 (PARI) vecextract(A2182,vecsort(v112778,,1)) \\ v112778=apply(bigomega,A2182[1..N]) or from b-file; A2182 must be a vector of values of A002182. - _M. F. Hasler_, Jan 08 2020 %Y A328519 Cf. A001222 (bigomega), A002182 (Highly Composite Numbers). %Y A328519 Cf. A112778 (bigomega of HCNs). %K A328519 nonn %O A328519 1,2 %A A328519 _David A. Corneth_, Jan 04 2020