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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A257907型 1之后A257906型(其d序列)。 4
1, 2, 3, -2, 4, -3, 5, -1, 7, -9, 8, -4, 9, -8, 10, -5, 15, -19, 11, -10, 12, -7, 17, -18, 16, -13, 19, -17, 21, -16, 26, -29, 23, -21, 25, -23, 27, -26, 28, -27, 29, -25, 33, -35, 31, -22, 40, -45, 35, -34, 36, -33, 39, -41, 37, -31, 43, -42, 44, -47, 41 (列表;图表;参考文献;;历史;文本;内部格式)
抵消
1,2
评论
这是由以下通用规则“规则3”(见下文)生成的序列(d(n)),参数a(1)=0,d(1)=1,而2006年2月57906日给出了相应的序列a(n)。
规则3如下。对于k>=1,设A(k)={A(1),…,A(k)}和D(k)={D(1)…,D(k){。从k=1和非负整数a(1)和d(1)开始。
步骤1:如果有一个整数h,使得1-a(k)<h<0,h不在D(k)中,a(k;否则执行步骤2。
步骤2:设h是D(k)中不包含的最小正整数,使得a(k)-h不包含在a(k)内。设a(k+1)=a(k)+h和d(k+1”)=h。用k+1替换k,然后执行步骤1。
请参见A257905型有关相关序列和猜想的指南。
规则3的一个非正式版本如下:序列“d”和“a”是联合生成的,“驱动思想”的思想是“d”的每个新项都是通过贪婪算法获得的。请参见A131388号类似程序(规则1)。
链接
Clark Kimberling(前1000个任期)和Antti Karttunen,n,a(n)表,n=1.10000
例子
a(1)=0,d(1)=1;
a(2)=2,d(2)=2;
a(3)=5,d(3)=3;
a(4)=3,d(4)=-2。
数学
{a,f}={0},{1}};Do[tmp={#,#-最后[a]}和[Min[Complement[#,Intersection[a,#]]和[Last[a]+补码[#,Intersection[f,#]]&[Range[2-最后[a],-1]]]];
如果[!IntegerQ[tmp[[1]]],tmp={Last[a]+#,#}&[NestWhile[#+1&,1,!(!MemberQ[f,#]&&!MemberQ[a,Last[a]-#])&]]];附加到[a,tmp[[1]]];附加到[f,tmp[[2]]],{120}];{a,f}(*彼得·J·C·摩西2015年5月14日*)
黄体脂酮素
(方案,带有备忘录-宏定义)
;; 朴素的二次算法,但现在已经足够了。还需要来自的代码A257906型:
(定义(A257907型n) (cond((=1n)1)(else(let(k(-n 1)))(a_k(A257906型(-n 1)))(让aloop((h(+1(-1 a_k))))A257906型k) (不在范围内?hA257907型k) )h)(否则(bloop(+1 h)))(和(not_in_range_of?(+a_k h))A257906型k) (不在范围内?hA257907型k) )h)(其他(aloop(+1 h))))
(定义(not_in_range_of?k fun upto_n)(let loop((i 1)))(cond((>i upto-n)#t)((=(fun i)k)#f)(else(loop(+1))))
;;安蒂·卡图恩2015年5月20日
(哈斯克尔)
导入数据。列表(\\)
a257907 n=a257907列表!!(n-1)
a257907_list=1:f[0][1]其中
f xs@(x:_)ds=g[2-x..-1]其中
g[]=h:f((x+h):xs)(h:ds)其中
(h:_)=[z|z<-[1..]\\ds,x-z`非元素`xs]
g(h:hs)|h`非元素`ds&y`非元素` xs=h:f(y:xs)(h:ds)
|否则=g hs
其中y=x+h
--Reinhard Zumkeller公司2015年6月3日
交叉参考
在初始1之后A257906型(与此规则关联的a序列)。
囊性纤维变性。A257905型
关键词
签名,容易的
作者
克拉克·金伯利2015年5月16日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年6月19日03:10。包含373492个序列。(在oeis4上运行。)