OFFSET
1,1
COMMENTS
This sequence is infinite. For example, 3200*p is a term for all primes p >= 257.
The least odd term of this sequence is a(1273824) = 3010132125.
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
EXAMPLE
144 is a term since it has 7 deficient divisors: {1, 2, 3, 4, 8, 9, 16} and 7 abundant divisors: {12, 18, 24, 36, 48, 72, 144}.
MATHEMATICA
ab[n_] := DivisorSigma[1, n] - 2n; eqdivQ[n_] := Count[(abs = ab/@Divisors[n]), _?(# > 0 &)] == Count[abs, _?(# < 0 &)]; Select[Range[50000], eqdivQ]
CROSSREFS
KEYWORD
nonn
AUTHOR
Amiram Eldar, Jun 13 2020
STATUS
approved