1,2
sigma_11(n) is the sum of the 11-th powers of the divisors of n.
Do[If[Mod[DivisorSigma[11, n]+EulerPhi[n]^11, n]==0, Print[n]], {n, 1, 10^5}]
Sequence in context: A080981 A106455 A055697 this_sequence A095914 A045218 A058216
Adjacent sequences: A055702 A055703 A055704 this_sequence A055706 A055707 A055708
nonn
Robert G. Wilson v (rgwv(AT)rgwv.com), Jun 09 2000
Search completed in 0.002 seconds