显示找到的3个结果中的1-3个。
第页1
1, 3, 7, 12, 18, 26, 35, 45, 56, 69, 83, 98, 114, 131, 150, 170, 191, 213, 236, 260, 285, 312, 340, 369, 399, 430, 462, 495, 529, 565, 602, 640, 679, 719, 760, 802, 845, 889, 935, 982, 1030, 1079, 1129, 1180, 1232, 1285, 1339, 1394, 1451, 1509, 1568, 1628, 1689
评论
霍夫施塔特在讨论斯科特·金(Scott Kim)的“FIGURE-FIGURE”绘画时介绍了这一序列-N.J.A.斯隆2013年5月25日
参考文献
E.Angelini,“Jeux de suites”,载于《Pour La Science档案》,第32-35页,第59卷(Jeux math'),2008年4月/6月,巴黎。
D.R.Hofstadter,Goedel,Escher,《巴赫:永恒的金辫子》,兰登书屋,1980年,第73页。
N.J.A.Sloane和Simon Plouffe,《整数序列百科全书》,学术出版社,1995年(包括该序列)。
链接
A.S.Fraenkel,与新旧序列相关的新游戏,INTEGERS,《组合数论电子杂志》,第4卷,G6论文,2004年。
D.R.Hofstadter,埃塔·洛尔[缓存副本,具有权限]
克拉克·金伯利,互补方程《整数序列杂志》,第10卷(2007年),第07.1.4条。
配方奶粉
设a(n)=这个序列,b(n)=A030124号前缀为0。那么b(n)=mex{a(i),b(i):0<=i<n},a(n)=a(n-1)+b(n。(弗伦克尔)
a(1)=1,a(2)=3;a()增加;对于n>=3,如果a(q)=a(n-1)-a(n-2)+1,对于某些q<n,则a(n)=aAlbert Neumueller(Albert.neu(AT)gmail.com),2006年7月29日
a(n)=n^2/2+n^(3/2)/(3*sqrt(2))+O(n^)(5/4))[在Jubin链接中证明]-贝诺伊特·朱宾2015年5月13日
例子
序列读取1 3 7 12 18 26 35 45…,差异为2 4 5、6、8、9、10。。。关键是序列本身之外的每个数字都会出现差异。这个属性(以及序列和第一个差异序列都在增加的事实)定义了序列!
MAPLE公司
最大值:=5000;h:=阵列(1..5000);h[1]:=1;a:=[1];i:=1;b:=[];对于从2到1000的n,如果h[n]<>1,则b:=[op(b),n];j:=a[i]+n;如果j<maxn,则a:=[op(a),j];h[j]:=1;i:=i+1;fi;fi;od:a;b、 #个a是A005228号,b是A030124号.
选项记忆;
局部a,fnd,t;
如果n<=1,则
op(n+1,[2,4]);
其他的
对于来自procname(n-1)+1 do的a
fnd:=假;
对于t从1到n+1 do
fnd:=真;
断裂;
结束条件:;
结束do:
如果没有找到,那么
返回a;
结束条件:;
结束do:
结束条件:;
结束进程:
选项记忆;
如果n<=2,则
op(n,[1,3]);
其他的
结束条件:;
数学
a={1};d=2;k=1;Do[While[位置[a,d]!={},d++];k=k+d;d++;a=附加[a,k],{n,1,55}];一
(*第二个程序:*)
(*拉里·莫里斯的节目,2017年1月19日:*)
d=3;a={1,3,7,12,18};而[Length[a=Join[a,a[-1]]+累加[Range[a[[d]]+1,a[[++d]-1]]]<50];一
(*注释:这将为序列添加尽可能多的项,因为每组序列差异中都有数字。因此,它生成的数字列表可能会长于提供的限制。显示限制为50时,生成的序列的长度为60。*)
黄体脂酮素
(哈斯克尔)
导入数据。列表(删除)
a005228 n=a005228_列表!!(n-1)
a005228_list=1:图1[2],其中
图n(x:xs)=n’:图n’(删除n’xs),其中n’=n+x
(PARI)A005228号(n,print_all=0,s=1,used=0)={while(n--,used+=1<<s;print_aall&print1(s“,”);for(k=s+1,9e9,bittest(used,k)&next;bittest\\M.F.哈斯勒2013年2月5日
交叉参考
以下是一组相关序列:A005132号,A006509号,A037257号,A037258号,A037259号,A081145号,A093903号,A099004号,A100707号,A129198号,A129199号,A140778号,A225376号,A225377号,A225378号,A225385号,A225386号,A225387号.
相关复发:
2, 4, 5, 6, 8, 9, 10, 11, 13, 14, 15, 16, 17, 19, 20, 21, 22, 23, 24, 25, 27, 28, 29, 30, 31, 32, 33, 34, 36, 37, 38, 39, 40, 41, 42, 43, 44, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 70, 71, 72, 73, 74, 75, 76, 77, 78
评论
对于任意n,满足和(i=1,n,a(i))+1<k<和(i+1,n+1,a(ii))+1的所有整数k都在序列中。例如,总和(i=1,3,a(i))+1=12,总和(i=1,4,a(ii))+1=18,因此13,14,15,16,17是按顺序排列的-贝诺伊特·克洛伊特2002年4月1日
参考文献
E.Angelini,“Jeux de suites”,载于《Pour La Science档案》,第32-35页,第59卷(Jeux math'),2008年4月/6月,巴黎。
D.R.Hofstadter,“哥德尔、埃舍尔、巴赫:永恒的金辫子”,《基础图书》,第1和第20年。版本(1979&1999),第73页。
配方奶粉
a(n)=n+sqrt(2n)+o(n^(1/2))-M.F.哈斯勒2008年6月4日[朱斌的论文证明]。
数学
(*h代表霍夫斯塔特序列A005228号*)h[1]=1;h[2]=3;h[n]:=h[n]=2*h[n-1]-h[n-2]+如果[MemberQ[数组[h,n-1],h[n-1]-h[n-2]+1],2,1];差异[数组[h,69]](*Jean-François Alcover公司2011年10月6日*)
黄体脂酮素
(PARI){a=b=t=1;对于(i=1100,while(位测试(t,b++),);打印1(b“,”);t+=1<<b+1<<a+=b)}\\M.F.哈斯勒2008年6月4日
(哈斯克尔)
导入数据。列表(删除)
a030124 n=a030124_列表!!n个
a030124_list=图差异1[2..]其中
figureDiff n(x:xs)=x:figureDiff n'(删除n'xs),其中n'=n+x
交叉参考
囊性纤维变性。A005228号,A030124号,A037257号,A037258号,A037259号,A061577号,A140778号,A129198号,A129199号,A100707号,A093903号,A005132号,A006509,A081145号,A099004号,A225376号,A225377个,A225378号,A225385号,A225386号,A225387号,A225687型.
按行读取的不规则三角形:词典学上最早、最小大小的集合S_n,例如{1,2,…n}是S_n与S_n中不同对之和以及S_n中对之差的并的子集。
+10 1
1, 1, 2, 1, 2, 1, 3, 1, 2, 3, 1, 2, 4, 1, 2, 5, 1, 2, 6, 1, 2, 3, 6, 1, 2, 3, 7, 1, 2, 3, 8, 1, 2, 3, 9, 1, 2, 6, 11, 1, 2, 3, 4, 10, 1, 2, 3, 4, 11, 1, 2, 3, 4, 12, 1, 2, 3, 7, 14, 1, 2, 3, 8, 15, 1, 2, 3, 9, 16, 1, 2, 7, 13, 17, 1, 2, 3, 4, 8, 17
评论
每一行都弱长于前一行,如果前一行的长度相同,则弱词典编纂较晚。
例子
对于n=7,S_7={1,2,5}。因为{1,2,…,7}可以表示为{1,2,1+2,5-1,5,5+1,5+2},其中每个项位于S_7中,或者是S_7中两个不同项的和或差。
不存在少于三个元素的集合具有此属性,S_7是具有此属性的三个元素在词典学上最早的集合。
表格开始:
1;
1, 2;
1, 2;
1, 3;
1, 2, 3;
1, 2, 4;
1, 2, 5;
1, 2, 6;
1, 2, 3, 6;
1, 2, 3, 7.
搜索在0.007秒内完成
|