登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 


搜索: a282957-编号:a282977
    排序:关联|参考文献||被改进的|创建     格式:长的|短的|数据
基于5细胞von Neumann邻域,“规则533”定义的二维细胞自动机第n个生长阶段的x轴从左边缘到原点的二进制表示。
+10
4
1, 10, 100, 1001, 10010, 100100, 1001011, 10010001, 100101100, 1001000011, 10010111101, 100100010010, 1001011000000, 10010000111111, 100101111011101, 1001000100101010, 10010110011010000, 100100001000100111, 1001011110111011001, 10010001001010100110
抵消
0,2
评论
在零级用单个黑色(ON)单元初始化。
参考文献
S.Wolfram,《一种新的科学》,Wolfram Media,2002年;第170页。
链接
罗伯特·普莱斯,n=0..126时的n、a(n)表
罗伯特·普莱斯,前20个阶段的图表
N.J.A.斯隆,元胞自动机中On单元数的研究,arXiv:1503.01168[math.CO],2015年
埃里克·魏斯坦的数学世界,初等细胞自动机
S.Wolfram,一种新的科学
Wolfram研究公司,Wolfram简单程序地图集
配方奶粉
推测来自柴华武,2024年5月5日:(开始)
当n>24时,a(n)=10001*a(n-4)-10000*a(n-8)。
通用公式:(99000000*x^24-991000000*x ^23+1000000*x^22+1000000*x^21-9999000*x^20-900*x^19-100*x^18-111011000*x^17+1101000*x*^16+1000*x ^15+1100*x^13-1100*x^12+9*x^11+90*x^10-89*x^9+1090*x*x^8-1000*x^7+911*x^6+90*x ^5+9*x ^4+1001*x^3+100*x ^2+10*x+1)/(10000*x^8-10001*x^4+1)。(结束)
数学
CAStep[rule_,a_]:=映射[rule[[10-#]]&,ListConvolve[{{0,2,0},{2,1,2},},a,2],{2}];
代码=533;阶段=128;
规则=整数位数[code,2,10];
g=2*级+1;(*网格的最大尺寸*)
a=PadLeft[{{1}},{g,g},0,Floor[{g,g}/2]];(*电网上的初始ON电池*)
ca=a;
ca=表[ca=CAStep[rule,ca],{n,1,stages+1}];
PrependTo[ca,a];
(*修剪整个网格以反映每个阶段一个单元格的增长*)
k=(长度[ca[[1]]]+1)/2;
ca=表[表[部分[ca[[n]][[j]],范围[k+1-n,k-1+n]],{j,k+1-n,k-1+n}],{n,1,k}];
表[FromDigits[Part[ca[i]][[i]],Range[1,i],10],{i,1,stages-1}]
交叉参考
囊性纤维变性。A282955型,A282956型,A282957型.
关键词
非n,容易的
作者
罗伯特·普莱斯2017年2月25日
状态
经核准的
基于5细胞von Neumann邻域,“规则533”定义的二维细胞自动机第n个生长阶段的x轴从原点到右边缘的二进制表示。
+10
4
1, 1, 1, 1001, 1001, 1001, 1101001, 10001001, 1101001, 1100001001, 10111101001, 10010001001, 1101001, 11111100001001, 101110111101001, 101010010001001, 1011001101001, 111001000100001001, 1001101110111101001, 1100101010010001001, 110101011001101001
抵消
0,4
评论
在零级用单个黑色(ON)单元初始化。
参考文献
S.Wolfram,《一种新的科学》,Wolfram Media,2002年;第170页。
链接
罗伯特·普莱斯,n=0..126时的n、a(n)表
罗伯特·普莱斯,前20个阶段的图表
N.J.A.斯隆,元胞自动机中On单元数的研究,arXiv:1503.01168[math.CO],2015年
埃里克·魏斯坦的数学世界,初等细胞自动机
S.Wolfram,一种新的科学
Wolfram研究公司,Wolfram简单程序地图集
配方奶粉
推测来自柴华武,2024年5月5日:(开始)
当n>24时,a(n)=10001*a(n-4)-10000*a(n-8)。
通用名称:(-99000000000000*x^24-90100000000000000*x^23+10000000000000*x^22+110000000000000*x^21+999990000000000000*x^20+99000000000000000*x^19-100000000000000000*x^18-11011100000000*x^17+1010000000000000*x^16+11000000000000*x^15+110000000000000*x^13-1100000000*x^12-90000000000*x^11-90000000000*x^10+1090000000000*x^9-8900000*x^8-10000*x^7+1091000*x^6-9000*x^5-9000*x^4+1001*x^3+x^2+x+1)/(10000*x^8-10001*x^4+1)。(结束)
数学
CAStep[rule_,a_]:=映射[rule[[10-#]]&,ListConvolve[{{0,2,0},{2,1,2},},a,2],{2}];
代码=533;阶段=128;
规则=整数位数[code,2,10];
g=2*级+1;(*网格的最大尺寸*)
a=PadLeft[{{1}},{g,g},0,Floor[{g,g}/2]];(*电网上的初始ON电池*)
ca=a;
ca=表[ca=CAStep[rule,ca],{n,1,stages+1}];
PrependTo[ca,a];
(*修剪整个网格以反映每个阶段一个单元格的增长*)
k=(长度[ca[[1]]]+1)/2;
ca=表[表[部分[ca[[n]][[j]],范围[k+1-n,k-1+n]],{j,k+1-n,k-1+n}],{n,1,k}];
表[FromDigits[部分[ca[i]][[i]],范围[i,2*i-1]],10],{i,1,阶段-1}]
交叉参考
关键词
非n,容易的
作者
罗伯特·普莱斯2017年2月25日
状态
经核准的
基于5细胞von Neumann邻域,“规则533”定义的二维细胞自动机第n个生长阶段的x轴从左边缘到原点的十进制表示。
+10
4
1, 2, 4, 9, 18, 36, 75, 145, 300, 579, 1213, 2322, 4800, 9279, 19421, 37162, 77008, 148007, 310745, 594598, 1232216, 2368039, 4971993, 9513126, 19715928, 37888551, 79551961, 152209574, 315455320, 606216743, 1272831449, 2435352742, 5047285592, 9699467815
抵消
0,2
评论
在零级用单个黑色(ON)单元初始化。
参考文献
S.Wolfram,《一种新的科学》,Wolfram Media,2002年;第170页。
链接
罗伯特·普莱斯,n=0..126时的n、a(n)表
罗伯特·普莱斯,前20个阶段的图表
N.J.A.斯隆,元胞自动机中On单元数的研究,arXiv:1503.01168[math.CO],2015年
埃里克·魏斯坦的数学世界,初等细胞自动机
S.Wolfram,一种新的科学
Wolfram研究公司,Wolfram简单程序地图集
配方奶粉
推测来自柴华武,2024年5月5日:(开始)
当n>24时,a(n)=17*a(n-4)-16*a(n-8)。
通用公式:(384*x^24-448*x^23+64*x*^22+384*x^21-120*x^20-4*x^19-4*x^18-472*x^17+208*x^16+8*x^15+12*x^13-12*x^12+x^11+2*x^10-x^9+10*x ^8-8*x^7+7*x^6+2*x*x^5+x^4+9*x^3+4*x^2+2*x+1)/(16*x^8-17*x^4+1)。(结束)
数学
CAStep[rule_,a_]:=映射[rule[[10-#]]&,ListConvolve[{{0,2,0},{2,1,2},},a,2],{2}];
代码=533;阶段=128;
规则=整数位数[code,2,10];
g=2*级+1;(*网格的最大尺寸*)
a=PadLeft[{{1}},{g,g},0,Floor[{g,g}/2]];(*电网上的初始ON电池*)
ca=a;
ca=表[ca=CAStep[rule,ca],{n,1,stages+1}];
PrependTo[ca,a];
(*修剪整个网格以反映每个阶段一个单元格的增长*)
k=(长度[ca[[1]]]+1)/2;
ca=表[表[部分[ca[[n]][[j]],范围[k+1-n,k-1+n]],{j,k+1-n,k-1+n}],{n,1,k}];
表[FromDigits[Part[ca[i]][[i]],Range[1,i],2],{i,1,stages-1}]
交叉参考
囊性纤维变性。A282954型,A282955型,A282957型.
关键词
非n,容易的
作者
罗伯特·普莱斯2017年2月25日
状态
经核准的

搜索在0.009秒内完成

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

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

上次修改时间:美国东部夏令时2024年9月21日04:44。包含376079个序列。(在oeis4上运行。)