|
|
A058076
|
|
Numbers n such that n | sigma_3(n) + sigma_2(n) + sigma_1(n) + sigma_0(n).
|
|
0
|
|
|
1, 4, 5, 6, 9, 14, 42, 69, 138, 428, 2772, 3243, 3306, 4830, 7882, 24720, 49710, 53403, 314184, 1351280, 1847772, 27247596, 31525032, 41113416, 41590824, 42844894, 44193564, 47287104, 95962560, 104935384, 124365885, 211756464, 569983507
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
sigma_0(n) is the number of divisors of n (A000005).
sigma_1(n) is the sum of the divisors of n [same as sigma(n)] (A000203).
sigma_2(n) is the sum of the squares of the divisors of n (A001157).
sigma_3(n) is the sum of the cubes of the divisors of n (A001158).
|
|
LINKS
|
|
|
MATHEMATICA
|
Do[ If[ Mod[ DivisorSigma[3, n] + DivisorSigma[2, n] + DivisorSigma[1, n] + DivisorSigma[0, n], n] == 0, Print[n]], {n, 1, 6.6 10^6}]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|