OFFSET
1,2
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..250
EXAMPLE
12 qualifies because it sets a record of 1+2+3=6. (1, 2 and 3 are the divisors of 12 <= sqrt(12).)
MATHEMATICA
lst = {}; s = -1; Do[t = Plus @@ Select[Divisors@n, # <= Sqrt@n &]; If[t > s, AppendTo[lst, n]; s = t], {n, 25199}]; lst (* Robert G. Wilson v, Aug 03 2008 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
J. Lowell, Jul 28 2008
EXTENSIONS
More terms from Robert G. Wilson v, Aug 03 2008
STATUS
approved