This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A339938 #8 Dec 24 2020 04:47:45 %S A339938 15015,19635,21945,23205,25935,26565,31395,33495,33915,35805,39585, %T A339938 41055,42315,42735,45885,47355,49665,50505,51765,54285,55965,58695, %U A339938 61215,64155,68145,70455,72345,75075,77385,80535,82005,83265,84315,91245,95865,102795,105105 %N A339938 Odd non-coreful abundant numbers: the odd terms of A308127. %C A339938 First differs from A112643, A129485 and A249263 at n = 28. %H A339938 Amiram Eldar, <a href="/A339938/b339938.txt">Table of n, a(n) for n = 1..10000</a> %e A339938 15015 is a term since it is odd and the sum of its non-coreful divisors is A308135(15015) = 17241 > 15015. %t A339938 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[#] > # &] %Y A339938 Intersection of A005408 and A308127. %Y A339938 Cf. A308135. %Y A339938 Similar sequences: A005231, A094889, A112643, A127666, A129485, A249263, A293186, A321147, A333950. %K A339938 nonn %O A339938 1,1 %A A339938 _Amiram Eldar_, Dec 23 2020