编号：A272737-OEIS

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

搜索： 编号：a272737

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

第页1

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

A272737型

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

+0
1

3, 9, 11, 29, 16, 36, 11, 97, 7, 69, 7, 137, 15, 81, 39, 237, -25, 133, -17, 281, -17, 145, 35, 377, -97, 277, -41, 309, 103, 73, 159, 465, -109, 269, -57, 537, -41, 249, 19, 721, -249, 501, -49, 509, 119, 33, 411, 621, -293, 537, -177, 877, -57, 161, 339

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

抵消

0,1

评论

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

参考文献

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

链接

罗伯特·普莱斯，n=0..127的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｝]；

代码=521；阶段=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单元格*）

表[on[i+1]-on[i]]，{i，1，长度[on]-1}]（*每个阶段的差异*）

交叉参考

囊性纤维变性。A272734型.

关键词

签名,容易的

作者

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

状态

经核准的

第页1

搜索在0.005秒内完成