OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
EXAMPLE
15015 is a term since it is odd and the sum of its non-coreful divisors is A308135(15015) = 17241 > 15015.
MATHEMATICA
f[p_, e_] := (p^(e + 1) - 1)/(p - 1); fc[p_, e_] := f[p, e] - 1; s[1] = 0; s[n_] := Times @@ (f @@@ FactorInteger[n]) - Times @@ (fc @@@ FactorInteger[n]); Select[Range[1, 10^5, 2], s[#] > # &]
CROSSREFS
KEYWORD
nonn
AUTHOR
Amiram Eldar, Dec 23 2020
STATUS
approved