%I#10 2014年3月2日12:35:56

%S 1,2,6,38551589750251032777801994011359168101987521250，

%电话：2370030450330003435041005117670132300143014145150161700，

%电话：23463524250249000308700365750407925423014372504681505247000577850585206616585

%N对N进行编号，使N|sigma_10（N）+phi（N）^10。

%Cσ_10（n）是n（A013958）的除数的10次幂之和。

%t Do[If[Mod[DivisorSigma[10，n]+EulerPhi[n]^10，n]==0，Print[n]]，{n，1，10^5}]

%o（PARI）isok（n）=！（（sigma（n，10）+eulerphi（n）^10）%n）；\\_Michel Marcus，2014年3月2日

%K nonn公司

%O 1,2号机组

%A _Robert G.Wilson v_，2000年6月9日

%E 2014年3月2日，来自米歇尔·马库斯的更多条款