登录
这个网站是通过捐款来支持的。OEIS基金会.

 

标志

请做一个捐款保持OEIS运行。我们现在已经第五十五岁了。在过去的一年里,我们增加了12000个新的序列,达到了8000个。引文(常说“感谢OEIS”)。我们需要筹集资金雇人管理提交,这将减少我们编辑的负担,加快编辑。
其他方式捐赠

提示
问候整数序列的在线百科全书!)
A128172 最小k,使得n^ k mod k= n+1。 十九
4700063497, 41459, 6821、15853, 121129, 535、36196439, 3827, 15084115509707、8153, 20395, 5805311、93929, 3736136819, 1343851、7099195, 319, 559、96641237093, 5053, 1535、280517, 148731221, 869、2062919, 17473, 803、39259 列表图表参考文献历史文本内部格式
抵消

2,1

评论

A(n)=k必须是奇数,因为n和n+1具有相反的奇偶性。如果K是奇数的话,这是唯一可能发生的。-Robert G. Wilson五世8月12日2009 [评论修正]卡博尼11月20日2016。

链接

Max Alekseyevn,a(n)n=2…43的表

卡博尼n,a(n)n=2,10000,1,对于尚未找到a(n)的大条目,12月24日2016 [有1772个新的术语,这取代了Robert G. Wilson V等人的早期表。]

Robert G. Wilson V.等,n,a(n)n=2,10000,1,对于尚未找到a(n)的大条目

例子

A(2)=A03623(3)=4700063497。

Mathematica

T=表[ 0,{ 10000 }];f[n]:=块[{k=1 },同时[k<2097153 & & PopeMOD[n,k,k] ]!= n+1,如果[mod [ k,6 ]=1,k+=4,k+=2 ] ];do[do] [t[[n]==0,a= f@ n;如果[a<2097153,t[[n]=a;打印[{n,a}] ],{n,10000 }];t(*)Robert G. Wilson五世8月12日2009*)

交叉裁判

囊性纤维变性。A03623A078567A119678A119679A127816A119715A119714A127817A127818A127819A127820A127821A128154A128155A128156A128157A128158A128159A128160.

囊性纤维变性。A128149=最小k,使得n^ k mod k=n=1。

语境中的顺序:A1727 97 A19631 A12497*A050259 A24972 A2434

相邻序列:A128169 A128170 A128171*A128173 A128174 A128175

关键词

诺恩

作者

亚力山大亚当丘克2月17日2007

扩展

A(15)=A128155(16)=3736136819和A(16)=A128156(17)=1343851瑞安普罗珀,2月27日至28日2007日

A(10),A(17),A(20),A(23)-A(24),A(26),A(30)-A(31),A(33)-A(35)由Tyler Cadigan(TyelCad igat(AT)Gmail)确定,2月21日2009。

修正条款哈根·冯艾辛马塔尔,八月05日2009

过时的链接到A文件重复删除马塔尔8月24日2009

编辑和A(36),A(38),A(41),A(48),A(49)阿列克谢耶夫,04月2日,3月25日,5月07日2012

地位

经核准的

查找γ欢迎γ维基γ注册γ音乐γ情节2γ演示γ指数γ浏览γ更多γ网络摄像机
贡献新的SEQ。或评论γ格式γ样式表γ变换γ超级导引头γ最近
OEIS社区通过保持OEIS基金会

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

最后修改了12月13日23时34分EST 2019。包含329974个序列。(在OEIS4上运行)