搜索： 编号：a298756
|
| |
| |
|
|
|
2047, 121, 341, 781, 217, 25, 9, 91, 9, 133, 91, 85, 15, 1687, 15, 9, 25, 9, 21, 221, 21, 169, 25, 217, 9, 121, 9, 15, 49, 15, 25, 545, 33, 9, 35, 9, 39, 133, 39, 21, 451, 21, 9, 481, 9, 65, 49, 25, 49, 25, 51, 9, 55, 9, 55, 25, 57, 15, 481, 15, 9, 529, 9, 33
(列表;图表;参考文献;听;历史;文本;内部格式)
|
|
|
|
抵消
|
2,1
|
|
|
评论
|
a（n）=9当且仅当n==1或8（mod 9）-罗伯特·伊斯雷尔2018年3月27日
|
|
|
链接
|
|
|
|
MAPLE公司
|
过滤器：=proc（n，b）局部d，s，r；
如果isprime（n），则返回false fi；
s： =padic:-ordp（n-1，2）；
d： =（n-1）/2^s；
如果b&^d mod n=1，则返回真fi；
对于从0到s-1的r do
如果b&^（d*2^r）+1 mod n=0，则返回真fi
od；
假
结束进程：
f： =proc（b）局部n；
对于从9乘2得到的n，如果过滤器（n，b），则返回n fiod
结束进程：
|
|
|
数学
|
sppQ[n_？EvenQ，_]：=假；sppQ[n_？PrimeQ，_]：=假；sppQ[n_，b_]：=模块[{ans=False}，s=整数指数[n-1，2]；d=（n-1）/2^s；如果[PowerMod[b，d，n]==1，ans=True，Do[如果[PowerMod[b，d*2^r，n]==n-1，ans=True]，{r，0，s-1}]]；ans]；leastSPP[b_]：=模块[{k=3}，而[！sppQ[k，b]，k+=2]；k] ；表[leastSPP[n]，{n，2100}]（*在Jean-François Alcover之后A020229号*)
|
|
|
黄体脂酮素
|
（PARI）is_a001262（n，a）={（位测试（n，0）&&！isprime（n）&&n>8）||return；my（s=赋值（n-1，2））；如果（1==a=Mod（a，n）^（n>>s），return（1））；而（a！=-1&s--，a=a^2）；a==-1}\\之后M.F.哈斯勒在里面A001262号
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
搜索在0.006秒内完成
|
