A362457 Indices of records in A362451.

1, 2, 12, 120, 840, 17136, 22680, 45360, 60480, 70560, 433440, 982800

Offset

1,2

Links

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

Index entries for sequences related to Gilbreath conjecture and transform

Mathematica

A362457[upto_]:=Module[{d=DivisorSigma[1, Range[upto]], r=1, f}, Join[{1}, Table[If[(f=First[d=Abs[Differences[d]]])>r, r=f; n, Nothing], {n, 2, upto}]]]; A362457[10000] (* Paolo Xausa, May 07 2023 *)

Crossrefs

Cf. A362451, A362456.

Sequence in context: A095717 A089431 A119701 * A364422 A286629 A361595

Adjacent sequences: A362454 A362455 A362456 * A362458 A362459 A362460

Keyword

nonn,more

Author

N. J. A. Sloane, May 07 2023

Extensions

a(9)-a(12) from Paolo Xausa, May 07 2023

Status

approved