|
|
|
|
|
|
|
|
|
#16通过雷·钱德勒2019年11月1日星期五12:46:37 EDT |
|
|
|
|
|
|
|
#15通过雷·钱德勒2019年11月1日星期五12:46:31 EDT |
|
| 数学
|
f[s_]：=附加[s，加@@Take[Sort[Select[s，GCD[#，Length[s]+1]==1&]]，-2]]；巢[f，{1,1}，74]（*_Ray Chandler_ *)_,九月 11 2006*)
|
|
| 状态
|
经核准的
编辑
|
|
|
|
|
|
|
#14通过N.J.A.斯隆2018年6月7日星期四22:00:31 EDT |
|
|
|
|
|
|
|
#13通过罗伯特·伊斯雷尔2018年6月7日星期四19:40:45 EDT |
|
|
|
|
|
|
|
#12通过罗伯特·伊斯雷尔2018年6月7日星期四19:39:15 EDT |
|
|
|
|
|
|
|
#11通过罗伯特·伊斯雷尔2018年6月7日星期四19:38:18 EDT |
|
| 评论
|
发件人罗伯特·伊斯雷尔，2018年6月7日：（开始）
对于n>=4，如果n是偶数，则a（n）=2。
对于n>=7，如果n是奇数，则a（n）==0（mod 6）。
对于n>=9，如果n==3（mod 6），a（n）=6。（结束）
|
|
| 链接
|
Robert Israel，<a href=“/122457英镑/b122457.txt“>n，n=1..10000时a（n）的表</a>
|
|
| MAPLE公司
|
N： =100:#对于（1）。。a（否）
V[1]：=1:V[2]：=1:
对于从3到n的n do
Q： =选择（t->igcd（t，n）=1，[seq（V[i]，i=1..n-1）]）；
j1:=最大[指数]（Q）；
V[n]：=Q[j1]+最大值（底土（j1=NULL，Q））
日期：
seq（V[i]，i=1..N）#罗伯特·伊斯雷尔，2018年6月7日
|
|
| 状态
|
经核准的
编辑
|
|
|
|
|
|
|
#10通过乔恩·肖恩菲尔德美国东部时间2015年3月20日星期五18:25:53 |
|
|
|
|
|
|
|
#9通过乔恩·肖恩菲尔德2015年3月20日星期五18:25:51 EDT |
|
| 数学
|
f[s_]：=追加[s，加@@Take[Sort[Select[s，GCD[#，Length[s]+1]=1&]]，-2]]；嵌套[f，{1,1}，74] (*] (* _雷 钱德勒*)_ *)
|
|
| 扩展
|
更正和扩展人雷·钱德勒和 _罗伯特·威尔逊v,_,2006年9月11日
|
|
| 状态
|
经核准的
编辑
|
|
|
|
|
|
|
#8通过查尔斯·格里特豪斯四世2014年4月9日星期三10:16:00 EDT |
|
|
|
|
|
讨论
|
| 2009年4月3日
| 10:16
| OEIS服务器: https://oeis.org/edit/global/2153
|
|
|
|
|
|
|
#7通过N.J.A.斯隆2014年2月5日星期三东部标准时间20:18:28 |
|
|
|
|
|
讨论
|
| 2月5日星期三
| 20:18
| OEIS服务器: https://oeis.org/edit/global/2118
|
|
|
|
|
|
