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 A070324 #24 Dec 27 2024 04:39:18
%S A070324 1,3,4,7,7,12,12,15,15,18,18,28,28,28,28,31,31,39,39,42,42,42,42,60,
%T A070324 60,60,60,60,60,72,72,72,72,72,72,91,91,91,91,91,91,96,96,96,96,96,96,
%U A070324 124,124,124,124,124,124,124,124,124,124,124,124,168,168,168,168,168,168
%N A070324 a(n) = Max( sigma(k) : k=1,2,3,...,n ).
%C A070324 Records give A034885. Where records occur gives A002093. - _Omar E. Pol_, Apr 23 2020
%H A070324 Hugo Pfoertner, <a href="/A070324/b070324.txt">Table of n, a(n) for n = 1..10000</a>
%H A070324 Amiram Eldar, <a href="/A070324/a070324.jpg">Plot of (1/n^2) * Sum_{i=1..n} a(i) for n = 2^(1..33)</a>.
%F A070324 Limit_{n -> infinity} (1/n^2) * Sum_{i=1..n} a(i) = C = 1.2... . [This formula is wrong. See the graph. - _Amiram Eldar_, Dec 27 2024]
%t A070324 FoldList[Max, DivisorSigma[1, Range[100]]] (* _Amiram Eldar_, Dec 27 2024 *)
%o A070324 (PARI) a(n)=vecmax(vector(n,k, sigma(k)))
%Y A070324 Cf. A000203, A002093, A034885.
%K A070324 easy,nonn
%O A070324 1,2
%A A070324 _Benoit Cloitre_, May 11 2002