OFFSET
1,2
COMMENTS
a(n) <= n, with equality if and only if n is in A002093.
Empirically it appears that lim inf_(n -> infinity) a(n)/n = 2/3, with minimum value a(29)/29 = 19/29.
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
MAPLE
N:= 1000:
B:= map(numtheory:-sigma, [$1..N]):
M:= max(B):
X:= Vector(M):
for n from 1 to N do
b:= B[n];
X[b..-1]:= X[b..-1] + <(1$(M-b+1))>;
A[n]:= X[b];
od:
seq(A[n], n=1..N);
CROSSREFS
KEYWORD
nonn,look
AUTHOR
Robert Israel, Jun 04 2015
STATUS
approved