OFFSET
1,1
COMMENTS
EXAMPLE
The smallest number with arithmetic mean of divisors = 2 is 3, hence a(2) = 3.
The next number with arithmetic mean of divisors in {2, 3} is 5, hence a(3) = 5.
The smallest number > a(5) = 11 with arithmetic mean of divisors in {a(1), ..., a(5)} = {2, 3, 5, 6, 11} is 14, hence a(6) = 14.
PROG
(Magma) S:={2}; for n in [1..600] do q, r:=Quotrem(&+Divisors(n), NumberOfDivisors(n)); if r eq 0 and q in S then Include(~S, n); end if; end for; S; // Klaus Brockhaus, Sep 05 2009
CROSSREFS
KEYWORD
nonn
AUTHOR
Jaroslav Krizek, Aug 27 2009
EXTENSIONS
Edited and extended by Klaus Brockhaus, Sep 05 2009
STATUS
approved