登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A181782号 奇数复合数n是一些基a,2<=a<=n-2的强伪素数。 4
25, 49, 65, 85, 91, 121, 125, 133, 145, 169, 175, 185, 205, 217, 221, 231, 247, 259, 265, 289, 301, 305, 325, 341, 343, 361, 365, 377, 385, 403, 425, 427, 435, 445, 451, 469, 475, 481, 485, 493, 505, 511, 529, 533, 545, 553, 559, 561, 565, 589, 595, 625, 629, 637, 645, 651, 671, 679, 685, 689, 697 (列表;图表;参考文献;;历史;文本;内部格式)
抵消
1,1
链接
阿米拉姆·埃尔达尔,n=1..10000时的n,a(n)表
例子
49是基数18、19、30和31的强伪素数,因此49在序列中。
黄体脂酮素
(PARI)/*函数sppq()来自http://www.jjj.de/pari/rabinmiller.gpi */
sppq(n,a)=
{/*返回n是否是基于a的强伪素数(拉宾·米勒)*/
局部(q,t,b,e);
q=n-1;t=0;而(0==比特和(q,1),q\=2;t+=1);
/*这里n==2^t*q+1*/
b=Mod(a,n)^q;
如果(1==b,则返回(1));
e=1;
而(e<t,
如果(b==1)||(b==n-1),则中断(););
b*=b;
e++;
);
返回(如果(b!=(n-1),0,1));
}
对于步骤(n=3,1000,2,if(isprime(n),next());对于(a=2,n-2,如果(sppq(n,a),打印1(n,“,”);断开()););
/*乔格·阿恩特2010年12月27日*/
(PARI)选择(是_A181782号(n) ={位测试(n,0)&&!i素数(n)&&对于(a=2,n-2,my(t=赋值(n-1,2),b=Mod(a,n)^(n>>t));b==1&&return(1);而(t-->0&&b!=-1&b!=1,b=b^2);b=-1&&retain(1_A181782号():select(…)免费提供检查和说明。在for循环中,与上面的sppq()函数完全等效-M.F.哈斯勒,2018年11月26日
交叉参考
参见。A141768号.
关键字
非n
作者
卡斯滕·迈耶2010年11月10日
扩展
定义修正人马克斯·阿列克塞耶夫2010年11月12日
条款更正人乔格·阿恩特2010年12月27日
状态
经核准的

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:2024年4月24日07:54 EDT。包含371922个序列。(在oeis4上运行。)