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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A108736号 从S={}开始。对于m=1、2、3。。。依次检查所有2^m m位字符串u的算术顺序。如果u不是S的子字符串,请将最小数量的0和1附加到S以解决此问题。序列给出S。 2
0, 1, 0, 0, 1, 1, 0, 0, 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 1, 0, 1, 0, 1, 1, 0, 1, 1, 1, 1, 0, 0, 0, 0, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1, 1, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 1, 0, 1, 0, 0, 0, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 1, 1, 0, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 1, 0, 1, 1, 1, 0 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,1
链接
Michael S.Branicky,n=1..10001时的n,a(n)表
例子
我们按照如下方式构造S,从S={}开始。
缺少0,因此S={0};
缺少1,因此S={0,1};
00缺失,因此S={0,1,0,0};
01和10现在可见,但缺少11,因此S={0,1,0,0,1,1};
000缺失,因此S={0,1,0,0,1,0,0,0};等。
MAPLE公司
bString:=proc(n,m)局部a,i;a:=[];对于i,从m-1到0乘以-1,执行a:=[操作(a),楼层(n/2^i)mod 2];od:返回(a);结束时间:A108736号:=proc(nmax)local S,m,b,partoverl,overl,mbstr;S:=[];m:=1:而nops(S)<nmax do for b from 0 to 2^m-1 do mbstr:=bString(b,m);如果verify(mbstr,S,'子列表')=false,则partover:=false;对于从m-1到1的overl by-1,如果verify(mbstr[1..overl],S[-overr.-1],'sublist')=true,则S:=[op(S),op(mbstr[overl+1..nops(mbstr)])];partover:=真;断裂;fi;od;如果partover=false,则S:=[op(S),op(mbstr)];fi;fi;od:m:=m+1:od:返回(S);结束:op(A108736号(80)) ; #R.J.马塔尔2007年8月15日
黄体脂酮素
(Python)
来自itertools导入计数、islice、product
def a():#术语生成器
S=“”
对于Sm in(“”),对于count(1)中的i,对于w in product(“01”,repeat=i)):
如果S中有Sm:继续
对于范围(1,len(Sm)+1)内的i:
v=Sm[-i:]
t=“”如果len(v)==len(Sm)else S[-len(Sm)+i:]
如果t+v==Sm:break
S+=v
列表产量(map(int,v))
打印(列表(islice(a),105))#迈克尔·布拉尼基2023年10月27日
交叉参考
囊性纤维变性。A108737号.
关键词
非n,容易的
作者
N.J.A.斯隆2005年6月23日
扩展
更多术语来自R.J.马塔尔2007年8月15日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年6月16日15:45。包含373432个序列。(在oeis4上运行。)