|
|
A054030
|
|
Sigma(n)/n for n such that sigma(n) is divisible by n.
|
|
15
|
|
|
1, 2, 2, 3, 2, 3, 2, 4, 4, 3, 4, 4, 2, 4, 4, 3, 4, 3, 2, 5, 5, 4, 3, 4, 2, 4, 4, 5, 4, 5, 5, 4, 5, 5, 4, 4, 4, 5, 4, 4, 2, 5, 4, 5, 6, 5, 5, 5, 5, 5, 5, 6, 5, 5, 4, 5, 6, 5, 4, 4, 5, 4, 5, 4, 6, 6, 6, 6, 6, 6, 6, 6, 5, 6, 6, 5, 6, 5, 6, 6, 5, 4, 4, 5, 4, 4, 5, 6, 5, 5, 4, 6, 4, 4, 6, 5, 6, 6, 6, 6, 6, 6, 6, 5, 6
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
The graph supports the conjecture that all numbers except 2 appear only a finite number of times. Sequences A000396, A005820, A027687, A046060 and A046061 give the n for which the abundancy sigma(n)/n is 2, 3, 4, 5 and 6, respectively. See A134639 for the number of n having abundancy greater than 2. - T. D. Noe, Nov 04 2007
|
|
LINKS
|
Eric Weisstein's World of Mathematics, Abundancy
|
|
FORMULA
|
|
|
MAPLE
|
with(numtheory): for i while i < 33000 do
if sigma(i) mod i = 0 then print(sigma(i)/i) fi od;
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|