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 A273018 #9 May 21 2016 23:38:52 %S A273018 84,168,336,420,504,630,672,840,1260,1680,2520,3360,3780,4200,5040, %T A273018 7560,10080,12600,15120,20160,25200,30240,37800,40320,45360,50400, %U A273018 75600,151200 %N A273018 Ramanujan's largely composite numbers having 7 as the greatest prime divisor. %C A273018 By the theorem in A273015, the sequence is finite. %t A273018 a = {}; b = {0}; Do[If[# >= Max@ b, AppendTo[a, k] && AppendTo[b, #]] &@ DivisorSigma[0, k], {k, 10^7}]; Select[a, FactorInteger[#][[-1, 1]] == 7 &] (* _Michael De Vlieger_, May 13 2016 *) %Y A273018 Cf. A067128, A273015, A273016. %K A273018 nonn,fini,full %O A273018 1,1 %A A273018 _Vladimir Shevelev_ and _Peter J. C. Moses_, May 13 2016