|
抵消
|
1,1
|
|
评论
|
其中一些是Carmichael数字,A002997号: 561, 1105, 1729, ....
|
|
链接
|
|
|
数学
|
选择[范围[115000]!PrimeQ[#]&&OddQ[#]&&PowerMod[2,#-1,#]==1&&Union[PowerMod[2],Drop[Divisors[#],1],#]]!={2} &&MoebiusMu[#]!=1 &]
|
|
程序
|
(PARI)是(n)=if(i素数(n)||Mod(2,n)^(n-1)=1||moebius(n)>=0,返回(0));fordiv(n,d,if(Mod(2,d)^d!)=2,返回(1));0 \\查尔斯·格里特豪斯四世2016年9月1日
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
已批准
|
|