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 A362458 #8 May 08 2023 11:48:01 %S A362458 0,1,62,574,1105,4132,130741,259750,326100 %N A362458 Records in A362452. %t A362458 A362458[upto_]:=Module[{d=DivisorSigma[1,Range[upto]]-Range[upto],r=0,f},Join[{r},Table[If[(f=First[d=Abs[Differences[d]]])>r,r=f,Nothing],upto-1]]];A362458[10000] (* _Paolo Xausa_, May 07 2023 *) %Y A362458 Cf. A362452, A362459. %K A362458 nonn,more %O A362458 1,3 %A A362458 _N. J. A. Sloane_, May 07 2023 %E A362458 a(7)-a(9) from _Rémy Sigrist_, May 07 2023