整数序列在线百科全书（OEIS）

修订历史记录A073666号

（粗体、蓝色下划线文本是附加;褪色的红色下划线文本是删除.)
显示条目1-10|较旧的更改

A073666号

自然数的重新排列，使得a（k）*a（k+1）+1是所有k的素数。
(历史;已发布版本)

#22通过N.J.A.斯隆2017年12月15日星期五17:35:58 EST

扩展

更多术语来自_杰森·厄尔斯 (泽维语_35711(在)雅虎.通用域名格式), _, 2002年8月26日

讨论

12月15日星期五

17:35

OEIS服务器: https://oeis.org/edit/global/2722

#21通过米歇尔·马库斯2016年3月6日星期日美国东部标准时间04:06:48

状态

检验过的

经核准的

#20通过乔格·阿恩特2016年3月6日星期日03:54:28 EST

状态

提出

检验过的

#19通过伊凡·内雷廷2016年3月6日星期日03:41:39 EST

状态

编辑

提出

讨论

3月6日星期日

03:54

乔格·阿恩特：谢谢！

#18通过伊凡·内雷廷2016年3月6日星期日03:41:32 EST

扩展

偏移量更改为1伊凡·内雷廷2016年3月6日

#17通过乔格·阿恩特2016年3月6日星期日03:18:44 EST

配方奶粉

a[1]=1；a[n_]：=a[n]=（对于[c=Sort[表[a[k]，{k，n-1}]]；d=Append[c，Last[c]+1]；m=First[Complement[Range[Last[d]]，c]]，MemberQ[c，m]||！PrimeQ[m*a[n-1]+1]，m+]；m）(法里德·菲鲁兹巴赫特2004年4月14日）

状态

提出

编辑

讨论

3月6日星期日

03:19

乔格·阿恩特：Iva：请记录延长线中偏移量的更改。

#16通过米歇尔·马库斯美国东部时间2016年3月6日星期日01:09:42

状态

编辑

提出

#15通过米歇尔·马库斯2016年3月6日星期日01:08:47 EST

数学

a[1]=1；a[n_]：=a[n]=（对于[c=Sort[表[a[k]，{k，n-1}]]；d=Append[c，Last[c]+1]；m=First[Complement[Range[Last[d]]，c]]，MemberQ[c，m]||！PrimeQ[m*a[n-1]+1]，m+]；m）；表[a[k]，{k，70}](_* _Farideh Firozbakht，2004年4月14日 *)

状态

提出

编辑

讨论

3月6日星期日

01:09

米歇尔·马库斯：公式看起来像是Mathematica代码，它已经存在。确定要删除吗？

#14通过伊凡·内雷廷2016年3月5日星期六18:14:39 EST

状态

编辑

提出

#13通过伊凡·内雷廷2016年3月5日星期六18:13:51 EST

抵消

0,1,2

链接

Ivan Neretin，<a href=“/A073666号/b073666.txt“>n表，n=1..1000时为a（n）</a>

状态

经核准的

编辑

讨论

2005年3月6日

18:14

伊凡·内雷廷：修复了偏移。否则，它无缘无故地与A081943不同，也与A073667相矛盾（其中a（n）=n:1,2,3…）。