OFFSET
1,2
COMMENTS
Also add a(n)/n as a separate sequence; first 8 terms are 1,1,2,2,4,2,6,3.
EXAMPLE
a(8) = 24 because 8 has only 4 divisors and 16 has only 5, but 24 has 8 and so 24 qualifies.
MATHEMATICA
a = {}; For[n = 1, n < 50, n++, i = 1; While[DivisorSigma[0, i*n] < n, i++ ]; AppendTo[a, n*i]]; a (* Stefan Steinerberger, Aug 28 2008 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
J. Lowell, Jul 27 2008
EXTENSIONS
More terms from Stefan Steinerberger, Aug 28 2008
STATUS
approved