A272375 Negative records in A187202 by index.

1, 10, 14, 20, 24, 38, 40, 48, 60, 84, 120, 180, 264, 300, 396, 432, 504, 540, 630, 720, 840, 1320, 2184, 2400, 2772, 3024, 3120, 3360, 3780, 3960, 5940, 6840, 7200, 8400, 9240, 10080, 12600, 15120, 21840, 22680, 25200, 27720, 30240, 40320, 52920, 55440, 83160, 128520, 131040, 138600, 166320, 196560, 221760

Offset

1,2

Comments

Often a(n)/2 is a member of A242393.

Search limit: 8300000000.

Links

Robert G. Wilson v, Table of n, a(n) for n = 1..123

Mathematica

f[n_] := (dvr = Divisors@ n; Differences[dvr, Length@ dvr - 1][[1]]); lst = {}; k = 1; mx = 2; While[k < 1000001, a = f@ k; If[a < mx, mx = a; AppendTo[lst, k]]; k++]

Crossrefs

Cf. A187202, A242393, A272374.

Sequence in context: A253785 A245729 A031274 * A246473 A063920 A269703

Adjacent sequences: A272372 A272373 A272374 * A272376 A272377 A272378

Keyword

nonn

Author

Robert G. Wilson v, Apr 28 2016

Status

approved