OFFSET
1,2
COMMENTS
Numbers k such that k*A001157(k)/A000203(k) is an integer. This sequence is connected closely with Ore divisor numbers (A001599) and RMS numbers (A140480).
This sequence is infinite. E.g., all the numbers of the form 3*2^m, for m >= 1, are terms, since 3*2^m * sigma_2(3*2^m) / sigma_1(3*2^m) = 5 * 2^(m-1) * (2^(m+1)+1) is an integer. - Amiram Eldar, Dec 25 2024
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000 (terms 1..1000 from Harvey P. Dale)
MATHEMATICA
Select[Range[300], IntegerQ[(#*DivisorSigma[2, #])/DivisorSigma[1, #]]&] (* Harvey P. Dale, Oct 28 2018 *)
PROG
(PARI) is(k) = my(f = factor(k)); !((k*sigma(f, 2)) % sigma(f)); \\ Amiram Eldar, Dec 25 2024
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Ctibor O. Zizka, Sep 25 2008
EXTENSIONS
More terms from Harvey P. Dale, Oct 28 2018
STATUS
approved