编号：A270187-OEIS

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

搜索： 编号：a270187

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

第页1

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

A270187型

基于5细胞von Neumann邻域，由“规则118”定义的二维细胞自动机生长的第n阶段中活跃（ON，黑色）细胞数量的部分和。

+0
1

1, 6, 14, 38, 62, 110, 146, 254, 310, 422, 522, 754, 850, 1054, 1250, 1686, 1854, 2230, 2522, 3138, 3378, 3862, 4318, 5110, 5602, 6450, 7210, 8190, 8954, 9858, 10866, 12234, 13254, 14766, 16026, 17814, 18966, 20554, 22302, 24322, 25978, 28106, 30138, 32534

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

抵消

0, 2

评论

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

参考文献

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

链接

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

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

埃里克·魏斯坦的数学世界，基本元胞自动机

S.Wolfram，一种新的科学

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

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

基本元胞自动机索引

数学

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

代码=118；阶段=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}]；

on=映射[Function[Apply[Plus，Flatten[#1]]]，ca]（*在每个阶段计数on单元格*）

表[Total[Part[on，Range[1，i]]]，{i，1，Length[on]}]（*每个阶段的总和*）

交叉参考

囊性纤维变性。A270185型.

关键词

非n,容易的

作者

罗伯特·普莱斯2016年3月12日

状态

经核准的

第页1

搜索在0.004秒内完成