A055714 Numbers n such that n | sigma_10(n).

1, 10, 60, 65, 75, 82, 84, 130, 140, 150, 175, 260, 350, 410, 420, 525, 780, 1050, 1105, 1550, 1812, 1820, 2050, 2100, 2210, 2325, 2378, 2460, 2665, 3050, 3250, 3500, 3972, 4228, 4420, 4575, 4650, 5330, 5425, 5460, 5473, 5740, 6150, 7852, 7868, 8282, 8840

Offset: 1

Author

Robert G. Wilson v, Jun 09 2000

Keywords

• nonn

Comments

sigma_10(n) is the sum of the 10th powers of the divisors of n (A013958).

Links

• Amiram Eldar, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A013958.

Programs

Mathematica

Do[If[Mod[DivisorSigma[10, n], n]==0, Print[n]], {n, 1, 10000}]