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 A362459 #8 May 08 2023 11:48:17 %S A362459 1,2,120,4200,14400,17640,243360,408240,669240 %N A362459 Indices of records in A362452. %t A362459 A362459[upto_]:=Module[{d=DivisorSigma[1,Range[upto]]-Range[upto],r=0,f},Join[{1},Table[If[(f=First[d=Abs[Differences[d]]])>r,r=f;n,Nothing],{n,2,upto}]]];A362459[10000] (* _Paolo Xausa_, May 07 2023 *) %Y A362459 Cf. A362452, A362458. %K A362459 nonn,more %O A362459 1,2 %A A362459 _N. J. A. Sloane_, May 07 2023 %E A362459 a(7)-a(9) from _Rémy Sigrist_, May 07 2023