A362458 - OEIS

A362458

Records in A362452.

0, 1, 62, 574, 1105, 4132, 130741, 259750, 326100

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,3

LINKS

Table of n, a(n) for n=1..9.

MATHEMATICA

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 *)

CROSSREFS

Cf. A362452, A362459.

Sequence in context: A202959 A209913 A209906 * A069473 A249530 A249531

Adjacent sequences: A362455 A362456 A362457 * A362459 A362460 A362461

KEYWORD

nonn,more

AUTHOR

N. J. A. Sloane, May 07 2023

EXTENSIONS

a(7)-a(9) from Rémy Sigrist, May 07 2023

STATUS

approved