|
|
A055709
|
|
Numbers k such that k | sigma_5(k).
|
|
11
|
|
|
1, 6, 22, 28, 66, 120, 198, 264, 308, 366, 440, 604, 672, 924, 984, 1320, 1464, 1694, 1717, 2013, 2296, 2464, 2574, 2970, 3434, 3608, 3960, 4026, 4228, 4598, 4920, 5082, 5151, 5348, 6200, 6600, 6644, 6776, 6868, 6888, 7320, 7392, 8052, 8128, 9504
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
sigma_5(k) is the sum of the 5th powers of the divisors of k (A001160).
Problem 11090 proves that this sequence is infinite. - T. D. Noe, Apr 18 2006
|
|
LINKS
|
|
|
MATHEMATICA
|
Do[If[Mod[DivisorSigma[5, n], n]==0, Print[n]], {n, 1, 15000}]
Select[Range[10000], Divisible[DivisorSigma[5, #], #]&] (* Harvey P. Dale, Aug 09 2013 *)
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|