%I A055714
%S A055714 1,10,60,65,75,82,84,130,140,150,175,260,350,410,420,525,780,1050,1105,
%T A055714 1550,1812,1820,2050,2100,2210,2325,2378,2460,2665,3050,3250,3500,3972,
%U A055714 4228,4420,4575,4650,5330,5425,5460,5473,5740,6150,7852,7868,8282,8840
%N A055714 Numbers n such that n | Sigma_10[n].
%C A055714 sigma_10(n) is the sum of the 10th powers of the divisors of n.
%t A055714 Do[If[Mod[DivisorSigma[10, n], n]==0, Print[n]], {n, 1, 10000}]
%Y A055714 Sequence in context: A055586 A054489 A140890 this_sequence A046762 A066290 
               A065641
%Y A055714 Adjacent sequences: A055711 A055712 A055713 this_sequence A055715 A055716 
               A055717
%K A055714 nonn
%O A055714 1,2
%A A055714 Robert G. Wilson v (rgwv(AT)rgwv.com), Jun 09 2000