登录
这个网站是通过捐款来支持的。OEIS基金会.

 

标志


提示
问候整数序列的在线百科全书!)
A185256 斯坦利序列S(0,3)。 二十五
0, 3, 4,7, 9, 12,13, 16, 27,30, 31, 34,36, 39, 40,43, 81, 84,85, 88, 90,93, 94, 97,108, 111, 112,115, 117, 120,121, 124, 243,246, 247, 250,246, 247, 250,γ,γ,γ,γ,γ,γ,γ 列表图表参考文献历史文本内部格式
抵消

1,2

评论

给定一个不包含3项算术级数的有限增长序列V=[VY1,…,VY-K],通过重复地追加比前一个项大的最小项,从而使新序列也不包含3项算术级数,得到斯坦利序列S(V)。

推荐信

R. K. Guy,数论中未解决的问题,E10。

链接

Alois P. Heinzn,a(n)n=1…2048的表

P. Erdos等人,贪心算法、算术级数、子集和和整除性,离散数学,200(1999),119-135。

J. L. Gerver和L. T. Ramsey贪心算法生成的无长算术级数的整数集数学。COMP,33(1979),1353-1359。

R. A. Moy关于斯坦利序列计数函数的增长性,ARXIV:1101.0022 [数学,NT],2010~2012。

R. A. Moy关于斯坦利序列计数函数的增长性,离散数学,311(2011),560-562。

A. M. Odlyzko和R. P. Stanley用贪心算法构造一些奇怪序列,1978。

S. Savchev和F. Chen关于极大无进展集的一个注记,离散数学,306(2006),2131-2133。

非平均序列的索引条目

例子

在〔0, 3, 4,7, 9〕之后,下一项不能是10或我们将有3项A.P.4,7,10;它不能是11,因为7,9,11;但是12是可以的。

枫树

斯坦利序列,离散数学。第311卷(2011),参见第560页。

SS:= PROC(S1,M)局部N,CHVEC,SWI,P,S2,I,J,T1,MMM;T1:=NOPS(S1);MMM:=1000;

S2:=阵列(1…T1+M,S1);CHVEC:=阵列(0…MMM);

对于I从1到T1做CHVEC [S2[i] ]:=1;OD;

第n项:

对于n从t1+ 1到t1+m do-ydo-DO 1

我尝试下学期:

对于i从S2[n-1 ] + 1到m mm,做第2步

SWI:=1;

对第j项的检验:

对于j从1到N-2,做第3题

P:= S2[N-J];

如果2*p i<0,则断裂;

如果CHVEC〔2×P i]=1,则SWI=1;中断;FI;

OD;γ-OD 3

如果SWI=1,则S2[n]:=I;CHVEC〔i〕:=1;中断;FI;

OD;γ-OD 2

如果SWI=1,则错误(“错误,在n=n时没有解”);

OD;γ-OD 1;

[SEQ(S2[i],i=1…t1+m)];

结束;

SS(〔0, 3〕,80);

Mathematica

SS[s1],My]:=模块[{n,CHVEC,SWI,p,s2,i,j,t1,Mmm },t1=长度[s1];Mmm=1000;S2=表[S1,{T1+M} ] / /平坦;CHVEC=数组[0,MM];

对于[i=1,i <=t1,i++,CHVEC[[S2[[i] ] ]=1 ];

(*获得第n项*)

对于[n=t1+ 1,n<=t1+m,n++,

(*尝试我作为下学期*)

对于[i=s2[[n-1 ] ] + 1,i <=m mm,i++,SWI=1;

(*对J-TH项进行测试*)

对于[j=1,j <=n-2,j++,p= s2[[n-j]];如果[2*p- i<0,断裂[]];

如果[CHVEC[[2×p- i]]=1,SWI=1;断裂[]];

如果[SWi==- 1,S2[[n]]= i;CHVEC[[i]]=1;[B][]];

如果[SW]=1,打印[ [错误,无解在n=],n] ];

表[S2[i],{i,1,t1+m }] ];

SS [ { 0, 3 },80 ](*)让弗兰,9月10日2013,翻译为枫树*)

黄体脂酮素

(帕里)A185256(n, show=1, L=3, v=[0, 3], D=v->v[2..-1]-v[1..-2])={while(#v1||next(2), 2); break)); if(type(show)=="t_VEC", v, v[n])} \\ 2nd (optional) arg: zero = silent, nonzero = verbose, vector (e.g. [] or [1]) = get the whole list [a(1..n)] as return value, else just a(n). -哈斯勒1月18日2016

交叉裁判

对于斯坦利序列的其他例子参见A000 587A000 5836A187843A188052A188053A188054A188055A188056A188057.

也见A000 47 963A03160A03163.

语境中的顺序:A326421 A034022 AA8972*A07092 A2465 A060142

相邻序列:A185253 A185254 A185255*A185257 A185258 A185259

关键词

诺恩

作者

斯隆3月19日2011

地位

经核准的

查找γ欢迎γ维基γ注册γ音乐γ情节2γ演示γ指数γ浏览γ更多γ网络摄像机
贡献新的SEQ。或评论γ格式γ样式表γ变换γ超级导引头γ最近
OEIS社区通过保持OEIS基金会

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

最后修改9月17日21:22 EDT 2019。包含327146个序列。(在OEIS4上运行)