OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..90
EXAMPLE
At 161253, 10920.0-10919.87+=0.127+, which is a difference of <1.
MATHEMATICA
t = {1, 1}; seq = {}; Do[s = DivisorSigma[#, n] & /@ {0, 1}; If[Abs[s[[2]]/s[[1]] - t[[2]]/t[[1]]] <= 1, AppendTo[seq, n]]; t += s, {n, 2, 162000}]; seq (* Amiram Eldar, Sep 06 2019 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
EXTENSIONS
a(1) corrected and more terms added by Amiram Eldar, Sep 06 2019
STATUS
approved