编号：A273246-OEIS

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

搜索： 编号：a273246

显示1-1个结果（共1个）。

第页1

排序：关联|参考文献|数|被改进的|创建格式：长的|短的|数据

A273246型

基于5细胞von Neumann邻域的“规则617”定义的二维细胞自动机第n个生长阶段的活动（ON，黑色）细胞数。

+0
4

1, 4, 21, 29, 72, 88, 152, 152, 264, 288, 400, 416, 576, 584, 768, 696, 984, 1000, 1264, 1280, 1520, 1544, 1872, 1800, 2224, 2168, 2600, 2496, 3000, 2808, 3416, 3008, 3776, 3648, 4312, 4168, 4784, 4616, 5416, 5296, 5996, 5860, 6584, 6400, 7288, 7032, 7900

(列表;图表;参考;听;历史;文本;内部格式)

抵消

0,2

评论

在零级用单个黑色（ON）单元初始化。

参考文献

S.Wolfram，《一种新的科学》，Wolfram Media，2002年；第170页。

链接

罗伯特·普莱斯，n=0..128时的n，a（n）表

罗伯特·普莱斯，前20个阶段的图表

N.J.A.斯隆，元胞自动机中On单元数的研究，arXiv:1503.01168[math.CO]，2015年

Eric Weistein的《数学世界》，基本元胞自动机

S.Wolfram，一种新的科学

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

二维五邻域元胞自动机索引

基本元胞自动机索引

数学

CAStep[rule_，a_]：=映射[rule[[10-#]]&，ListConvolve[{{0，2，0}，{2，1，2}，}，a，2]，{2}]；

代码=617；阶段=128；

规则=整数位数[code，2，10]；

g=2*级+1；（*网格最大尺寸*）

a=PadLeft[{{1}}，{g，g}，0，Floor[{g，c}/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}]；

Map[Function[Apply[Plus，Flatten[#1]]]，ca]（*每个阶段的细胞计数*）

关键词

非n,容易的

作者

罗伯特·普莱斯2016年5月18日

状态

经核准的

第页1

搜索在0.004秒内完成