搜索： a272350-编号：a272350
|
| |
|
|
A272504型
|
| 基于5细胞von Neumann邻域，“规则485”定义的二维细胞自动机第n个生长阶段中活动（ON，黑色）细胞数的部分和。 |
|
+10
1
|
|
|
|
1, 9, 14, 54, 71, 179, 216, 420, 473, 809, 898, 1378, 1499, 2147, 2304, 3192, 3349, 4445, 4714, 6070, 6331, 8019, 8348, 10368, 10773, 13161, 13638, 16442, 16951, 20127, 20796, 24376, 25077, 29193, 30078, 34706, 35631, 40791, 41724, 47496, 48669, 55025, 56178
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
0.2个
|
|
|
评论
|
在零级用单个黑色（ON）单元初始化。
|
|
|
参考文献
|
S.Wolfram，《一种新的科学》，Wolfram Media，2002年；第170页。
|
|
|
链接
|
|
|
|
数学
|
CAStep[rule_，a_]：=映射[rule[[10-#]]&，ListConvolve[｛0，2，0｝，｛2，1，2｝，｛0，2，0｝｝，a，2]，｛2｝]；
代码=485；阶段=128；
规则=整数位数[code，2，10]；
g=2*级+1；（*网格最大尺寸*）
a=PadLeft[｛｛1｝｝，｛g，g｝，0，Floor[｛g，g｝/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]}]（*每个阶段的总和*）
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,容易的
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A272505型
|
| 基于5细胞von Neumann邻域，“规则485”定义的二维细胞自动机第n个生长阶段中活动（ON，黑色）细胞数的第一个差异。 |
|
+10
1
|
|
|
|
7, -3, 35, -23, 91, -71, 167, -151, 283, -247, 391, -359, 527, -491, 731, -731, 939, -827, 1087, -1095, 1427, -1359, 1691, -1615, 1983, -1911, 2327, -2295, 2667, -2507, 2911, -2879, 3415, -3231, 3743, -3703, 4235, -4227, 4839, -4599, 5183, -5203, 5727, -5623
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
0,1
|
|
|
评论
|
在零级用单个黑色（ON）单元初始化。
|
|
|
参考文献
|
S.Wolfram，《一种新的科学》，Wolfram Media，2002年；第170页。
|
|
|
链接
|
|
|
|
数学
|
CAStep[rule_，a_]：=映射[rule[[10-#]]&，ListConvolve[{{0，2，0}，{2，1，2}，}，a，2]，{2}]；
代码=485；阶段=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，Length[on]-1}]（*每个阶段的差异*）
|
|
|
交叉参考
|
|
|
|
关键词
|
签名,容易的
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A272396型
|
| 基于5细胞von Neumann邻域，“规则485”定义的二维细胞自动机第2^n-1阶段的活动（ON，黑色）细胞数。 |
|
+10
0
|
|
|
|
1, 8, 40, 204, 888, 3580, 14648, 59792, 239668, 960664, 3844852, 15388808, 61571632, 246305788, 985328220, 3941279788
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
0.2个
|
|
|
评论
|
在零级用单个黑色（ON）单元初始化。
|
|
|
参考文献
|
S.Wolfram，《一种新的科学》，Wolfram Media，2002年；第170页。
|
|
|
链接
|
|
|
|
数学
|
CAStep[rule_，a_]：=映射[rule[[10-#]]&，ListConvolve[{{0，2，0}，{2，1，2}，}，a，2]，{2}]；
代码=485；阶段=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=映射[函数[Apply[Plus，Flatten[#1]]]，ca]（*每个阶段计数on个细胞*）
第[on，2^Range[0，Log[2，stages]]]部分（*提取相关术语*）
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,更多
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
搜索在0.007秒内完成
|
