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 A073349 #21 May 04 2025 01:58:07
%S A073349 1,2,4,6,12,24,28,36,48,60,120,180,234,240,360,496,600,672,720,840,
%T A073349 1170,1260,1680,1800,2016,2520,4200,5040,8128,10080,12600,15120,22320,
%U A073349 25200,27000,27720,37800,55440,55800,55860,110880,138600,166320,167580,277200
%N A073349 Numbers m such that sigma(m)/m is equal to sigma(k)/k for some k being superabundant (A004394).
%C A073349 Previous name was: Numbers n such that sigma(k)/k < sigma(n)/n for k=1,2,3...,n-1.
%H A073349 Amiram Eldar, <a href="/A073349/b073349.txt">Table of n, a(n) for n = 1..128</a>
%o A073349 (PARI) lista(nn) = {vs = Set(); maxs = 0; for(n = 1, nn, news = sigma(n, -1); if (news > maxs, maxs = news; print1(n, ", "); vs = Set(concat(vs, maxs));, if (setsearch(vs, news), print1(n, ", "));););} \\ _Michel Marcus_, Dec 02 2013
%Y A073349 Cf. A004394.
%K A073349 nonn
%O A073349 1,2
%A A073349 _Benoit Cloitre_, Aug 23 2002
%E A073349 New name and more terms from _Michel Marcus_, Dec 02 2013