OFFSET
1,2
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
MAPLE
with(numtheory): a := proc (n) local k: for k while k*tau(n) < n do end do: k*tau(n) end proc: seq(a(n), n = 1 .. 75); # Emeric Deutsch, Jun 21 2009
MATHEMATICA
smd[n_]:=Module[{nd=DivisorSigma[0, n]}, nd Ceiling[n/nd]]; Array[ smd, 80] (* Harvey P. Dale, Oct 10 2011 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Jun 15 2009
EXTENSIONS
More terms from Emeric Deutsch, Jun 21 2009
STATUS
approved