OFFSET
1,2
COMMENTS
The first nine odd primes are present, and then only (very) abundant numbers.
LINKS
Robert G. Wilson v, Table of n, a(n) for n = 1..106
EXAMPLE
MATHEMATICA
f[n_] := (dvr = Divisors@ n; Differences[dvr, Length@ dvr - 1][[1]]); k = 1; lst = {}; mx = 0; While[k < 100000001, If[ f@ k > mx, mx = f@ k; Print[{k, mx}]; AppendTo[lst, {k, mx}]]; k++]; Transpose[ lst][[1]]
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, May 12 2014
STATUS
approved