登录
OEIS基金会得到了OEIS用户的捐赠和西蒙斯基金会的资助。

 

标志

感谢每一位在我们的年度募捐活动中捐款的人!
要查看捐赠者列表或进行捐赠,请参见OEIS基金会主页。

提示
(问候来自整数序列在线百科全书!)
邮编:A181781 数n是某个基b的Euler伪素数,2<=b<=n-2。
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)表

卡斯滕·迈耶,假报春花(15-4999)

卡斯滕·迈耶,Rexx程序

埃里克·W·韦斯斯坦,数学世界:欧拉伪素数

枫木

isEulPSP:=proc(n,b)如果isprime(n)则为false;否则m:=modp(b&^((n-1)/2),n);如果m=1或m=n-1,则为true;else false;end if;end if;end proc:

isA181781:=proc(n)for b from 2 to n-2 do if isEulPSP(n,b)则返回true;end if;end do:返回false;end proc:

对于从3到800的n,do if isA181781(n),则printf(“%d,”,n);end if;end do:#R、 J.马萨2011年5月30日

数学

fQ[n\?PrimeQ,b_]=False;fQ[n_2;u]:=块[{p=PowerMod[b,(n-1)/2,n]},p==Mod[1,n]| | | p==Mod[-1,n]];gQ[n_u]:=AnyTrue[范围[2,n-2],fQ[n,#]&];选择[2范围[172]+1,gQ](*迈克尔·德维列格2015年9月9日,之后让·弗朗索瓦·阿尔科弗A006970型第10版)

黄体脂酮素

(请参阅链接中的Rexx程序。)

交叉引用

囊性纤维变性。A006970型,邮编:A181780.

上下文顺序:A274178 A118578年 A276700个*A324551型 A338081型 A118568年

相邻序列:邮编:A181778 A181779号 邮编:A181780*邮编:A181782 邮编:A181783 邮编:A181784

关键字

作者

卡斯滕·迈耶2010年11月12日

扩展

定义更正人马克斯·阿列克谢耶夫2010年11月12日

编辑定义与OEIS风格一致。-N、 斯隆2010年11月13日

状态

经核准的

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

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

上次修改时间:2021年1月15日12:47。包含340187个序列。(运行在oeis4上。)