编号：A270281-OEIS

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

搜索： 编号：a270281

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

第页1

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

A270281型

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

+0
1

4, 0, 28, -20, 80, -60, 128, -108, 232, -212, 344, -316, 472, -412, 552, -492, 736, -708, 968, -940, 1224, -1164, 1432, -1348, 1672, -1612, 1944, -1844, 2152, -1980, 2224, -2048, 2524, -2468, 2984, -2956, 3496, -3436, 3960, -3876, 4456, -4396, 4984, -4884

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

抵消

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｝]；

代码=139；阶段=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}]（*每个阶段的差异*）

交叉参考

囊性纤维变性。A270278型.

关键词

签名,容易的

作者

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

状态

经核准的

第页1

搜索在0.006秒内完成