STATUS
reviewed
approved
reviewed
approved
proposed
reviewed
editing
proposed
<a href="/index/Su#sums_of_divisors">Index entries for sequences related to sums of divisors</a>.
a[n_] := DivisorSum[n, # &, # < n && DivisorSigma[1, #] >= 2*# &]; Array[a, 100] (* Amiram Eldar, Mar 14 2024 *)
approved
editing
proposed
approved
editing
proposed
proposed
approved
editing
proposed
Antti Karttunen, <a href="/A294887/b294887.txt">Table of n, a(n) for n = 1..20000</a>