1,2
sigma_12(n) is the sum of the 12th powers of the divisors of n.
Do[If[Mod[DivisorSigma[12, n]+EulerPhi[n]^12, n]==0, Print[n]], {n, 1, 10^5}]
Sequence in context: A136306 A076146 A114552 this_sequence A118537 A109892 A055702
Adjacent sequences: A055703 A055704 A055705 this_sequence A055707 A055708 A055709
nonn
Robert G. Wilson v (rgwv(AT)rgwv.com), Jun 09 2000
Search completed in 0.002 seconds