|
|
A048968
|
|
Numbers k such that sigma(k) / d(k) is prime.
|
|
5
|
|
|
3, 5, 6, 13, 20, 37, 45, 49, 61, 73, 150, 157, 169, 193, 277, 313, 361, 397, 421, 457, 541, 613, 661, 673, 733, 757, 832, 877, 961, 997, 1093, 1153, 1201, 1213, 1237, 1321, 1381, 1445, 1453, 1621, 1657, 1734, 1753, 1849, 1873, 1933, 1993, 2017, 2137, 2341
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MAPLE
|
|
|
MATHEMATICA
|
Select[ Range[2400], PrimeQ[ DivisorSigma[1, #] / DivisorSigma[0, #] ]& ] (* Jean-François Alcover, Sep 24 2012 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,nice
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|