OFFSET
1,1
COMMENTS
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
EXAMPLE
12 is a term since it has only one abundant divisor, 12 itself.
36 is a term since it has 3 abundant divisors, 12, 18 and 36.
72 is a term since it has 5 abundant divisors, 12, 18, 24, 36 and 72.
MATHEMATICA
q[n_] := OddQ[DivisorSum[n, 1 &, DivisorSigma[-1, #] > 2 &]]; Select[Range[350], q]
PROG
(PARI) isok(k) = sumdiv(k, d, (sigma(d, -1) > 2)) % 2;
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Amiram Eldar, Feb 26 2025
STATUS
approved