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

 

标志
提示
(问候来自整数序列在线百科全书!)
邮编:A288979 基于5细胞von Neumann邻域,由“533规则”定义的二维元胞自动机第n个生长阶段的角到原点的对角线的十进制表示。 4
1、2、6、13、30、56、127、243、508、999、2041、4038、8182、16265、32745、65302、131034、261669、524217、1047630、2097010、4192405、8388329、16773406、33553890、67101277、134216625、268420174、536868850、1073711381、2147479273、4294906222、8589926290 (列表;图表;参考文献;;历史;文本;内部格式)
抵消

0,2个

评论

在第0阶段用一个黑色(ON)单元初始化。

参考文献

S、 沃尔夫拉姆,一门新的科学,沃尔夫拉姆媒体,2002;p、 170页。

链接

罗伯特·普莱斯,n=0的n,a(n)表。。126

罗伯特·普莱斯,前20级示意图

N、 J.A.斯隆,元胞自动机中的On细胞数,arXiv:1503.01168[math.CO],2015年

埃里克·韦斯坦的数学世界,元胞自动机

S、 沃尔夫拉姆,一门新的科学

Wolfram研究所,Wolfram简单程序图集

元胞自动机相关序列的索引项

二维五邻元胞自动机索引

元胞自动机索引

数学

CAStep[rule_u,a_u]:=Map[rule[[10-#]]&,listcollve[{0,2,0},{2,1,2},{0,2,0},a,2],{2}];

代码=533;阶段=128;

规则=整数位数[代码,2,10];

g=2*级+1;(*最大网格尺寸*)

a=PadLeft[{1}}},{g,g},0,楼层[{g,g}/2]];(*网格上的初始单元格*)

ca=a;

ca=表[ca=CAStep[rule,ca],{n,1,stages+1}];

前奏[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]],范围[i,2*i-1]],10],{i,1,stages-1}]

交叉引用

囊性纤维变性。A288977号,邮编:A288978,A288980号.

上下文顺序:A276411号 邮编:A180965 A075632号*A289048号 A297388号 A115217号

相邻序列:邮编:A288976 A288977号 邮编:A288978*A288980号 A288981号 邮编:A288982

关键字

,容易的

作者

罗伯特·普莱斯2017年6月20日

状态

经核准的

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

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

上次修改时间:2022年5月28日22:08。包含354122个序列。(运行在oeis4上。)