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

 

标志
提示
(来自的问候整数序列在线百科全书!)
搜索: 编号:181781
显示1-1个结果(共1个)。 第页1
    排序:关联|参考文献||被改进的|创建     格式:长的|短的|数据
A181781号 数n是一些基b的Euler伪素数,2<=b<=n-2。 +0
21, 25, 33, 45, 49, 57, 65, 69, 77, 85, 91, 93, 105, 117, 121, 125, 129, 133, 141, 145, 153, 161, 165, 169, 175, 177, 185, 189, 201, 205, 209, 213, 217, 221, 225, 231, 237, 245, 247, 249, 253, 259, 261, 265, 273, 285, 289, 297, 301, 305, 309, 321, 325, 329, 333, 341, 343, 345 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,1
链接
阿米拉姆·埃尔达尔,n=1..10000时的n,a(n)表
Karsten Meyer,Rexx程序
MAPLE公司
isEulPSP:=proc(n,b),如果isprime(n),则为false;否则m:=modp(b&^((n-1)/2),n);如果m=1或m=n-1,则为真;否则为假;结束条件:;结束条件:;结束进程:
isA181781:=proc(n)for b from 2 to n-2 do如果isEulPSP(n,b)然后返回true;结束条件:;end do:返回false;结束进程:
对于从3到800的n,如果是A181781(n),则执行printf(“%d,”,n);结束条件:;结束do:#R.J.马塔尔2011年5月30日
数学
fQ[n_?PrimeQ,b_]=假;fQ[n_,b_]:=块[{p=PowerMod[b,(n-1)/2,n]},p==Mod[1,n]||p==Mod[-1,n]];gQ[n_]:=AnyTrue[范围[2,n-2],fQ[n,#]&];选择[2范围[172]+1,gQ](*迈克尔·德弗利格2015年9月9日之后Jean-François Alcover公司A006970号,版本10*)
黄体脂酮素
(请参阅链接中的Rexx程序。)
交叉参考
囊性纤维变性。A006970号,A181780号.
关键词
非n
作者
卡斯滕·迈耶2010年11月12日
扩展
定义修正人马克斯·阿列克塞耶夫2010年11月12日
编辑的定义与OEIS风格一致-N.J.A.斯隆2010年11月13日
状态
已批准
第页1

搜索在0.003秒内完成

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

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

最后修改时间:美国东部时间2024年4月25日09:14。包含371967个序列。(在oeis4上运行。)