%我#17 2018年5月29日03:06:29
%S 1,4,5,9,10,21,32,34,45,55,65,68,70129153160176183203245340,
%电话:3704074415505806357417658068459651011025108911661247,
%电话:12921505150818402271240225842590328536044065422348325339
%N编号N,使σ(N+1)=3*phi(N)。
%H Robert Israel,<a href=“/A067261/b067261.txt”>n,a(n)表,n=1..1000</a>
%p选择(n->numtheory:-sigma(n+1)=3*numtheori:-phi(n),[$1..10000]);#_罗伯特·伊斯雷尔,2018年5月29日
%t选择[Range[6000],DivisorSigma[1,#+1]==3*EulerPhi[#]&](*H arvey P.Dale_,2017年6月11日*)
%o(PARI)isok(n)=σ(n+1)==3*eulerphi(n);\\_米歇尔·马库斯,2018年5月29日
%Y参考A000010、A000203。
%K nonn公司
%O 1,2号机组
%2002年2月21日,A _贝尼特·克洛伊特