OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由支持OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A049821号 a(n)=j+k,其中u(n)=u(j)+u(k)是A002859号(1<=j<k<n)。
3, 4, 5, 6, 8, 9, 12, 12, 14, 15, 15, 17, 18, 18, 20, 20, 22, 23, 23, 25, 25, 27, 28, 28, 35, 28, 29, 35, 33, 38, 35, 41, 37, 37, 39, 41, 46, 48, 43, 51, 45, 53, 48, 48, 50, 50, 58, 52, 60, 54, 56, 62, 56, 65, 59, 61, 61, 63, 70, 64, 66, 71, 66, 73, 69, 77, 71, 79, 73, 83, 74, 76, 78 (列表;图表;参考文献;;历史;文本;内部格式)
抵消
3,1
链接
埃里克·魏斯坦的数学世界,乌拉姆层序.
维基百科,乌拉姆数.
例子
发件人Petros Hadjicostas公司2019年11月20日:(开始)
A002859号(3) = 4 = 1 + 3 =A002859号(1) +A002859号(2) 因此a(3)=1+2=3。
A002859(4) = 5 = 1 + 4 =A002859号(1) +A002859号(3) 因此a(4)=1+3=4。
A002859号(5) = 6 = 1 + 5 =A002859号(1) +A002859号(4) 因此a(5)=1+4=5。
A002859号(6) = 8 = 3 + 5 =A002859号(2) +A002859号(4) 因此a(6)=2+4=6。
A002859号(7) = 10 = 4 + 6 =A002859号(3)+A002859号(5) 因此a(7)=3+5=8。
(结束)
MAPLE公司
#首先我们修改彼得·卢什尼的程序来自A002858元(长度>=3):
乌拉姆列表:=proc(len)local isUlam,nextUlam、headad;斩首:=u->u[2..numelems(u)];isUlam:=proc(n,h,u,r)本地hu,tu,hr,tr;hu:=u[1];小时:=r[1];如果h=2,则返回false;结束条件:;如果hr<=hu,则返回evalb(h=1);结束条件:;如果hr+hu=n,则tu:=斩首(u);tr:=斩首(r);返回isUlam(n,h+1,tu,tr);结束条件:;如果hr+hu<n,则tu:=斩首(u);返回isUlam(n,h,tu,r);结束条件:;tr:=斩首(r);伊斯乌兰语(n,h,u,tr);终末程序;nextUlam:=proc(n,u,r),如果isUlam(n,0,u,r),那么如果nops(u)=len-1,那么返回[op(u),n];结束条件:;下一个Ulam(n+1,[op(u),n],[n,op(r)]);其他nextUlam(n+1,u,r);结束条件:;终末程序;下一个乌拉姆(3,[1,3],[3,1]);结束进程:
#接下来,我们创建一个函数来计算给定n>=3的a(n):
a:=proc(n)局部u,a,i,j:u:=0:如果3<=n,则a:=UlamList(n):对于i到n-2,对于j从i+1到n-1,如果a[n]=a[i]+a[j],则u:=i+j:end if:end do:end if:u:end proc:
#最后,我们为a(n)创建一个值列表:
seq(a(n),n=3..100)#Petros Hadjicostas公司2019年11月20日
交叉参考
关键词
非n
作者
扩展
编辑的名称和更正的数据中的打字错误Petros Hadjicostas公司2019年11月20日
更多术语来自Petros Hadjicostas公司2019年11月20日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年6月18日22:34。包含373487个序列。(在oeis4上运行。)