OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。

登录

OEIS由支持OEIS基金会的许多慷慨捐赠者.

 

提示 （来自的问候整数序列在线百科全书!) A285931型 素数q<p，使得q^（p-1）==1（模p^2），其中p=素数（n）。 0 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 2, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0 (列表;图表;参考文献;听;历史;文本;内部格式) 抵消 1,70 评论 满足定义中条件的素数对（q，p）有时称为“Wieferich素数对”（参见Mossinghoff，2009）。 a（n）>0 iff p是A222184年. 从0:1、5、70、1618、2702等开始首次出现k-罗伯特·威尔逊v2017年5月10日 链接 n=1..105时的n、a（n）表。 M.J.Mossinghoff，Wieferich对和Barker序列《设计、代码和密码学》，第53卷，第3期（2009年），149-163。 例子 对于n=70：素数（70）=349，有两个素数q<349，使得q^（349-1）==1（模349^2），即223和317，因此a（70）=2。 数学 f[n_]：=块[{c=0，p=Prime@n，q=2}，While[q<p，If[PowerMod[q，p-1，p^2]==1，c++]；q=NextPrime@q]; c] ；数组[f，105](*罗伯特·威尔逊v2017年5月10日*） 黄体脂酮素 （PARI）a（n）=my（p=素数（n），i=0）；对于素数（q=1，p-1，如果（Mod（q，p^2）^（p-1）==1，i++））；我 交叉参考 囊性纤维变性。A222184号,A222206型（记录）。 上下文中的序列：A270882型 A278778型 A356817飞机*A069845号 A091397号 A119818年 相邻序列：285928英镑 A285929型 A285930型*A285932型 A285933型 A285934型 关键词 非n 作者 费利克斯·弗罗利奇（Felix Fröhlich），2017年4月30日 状态 经核准的

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

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

上次修改时间：美国东部夏令时2024年6月18日21:09。包含373487个序列。（在oeis4上运行。）