搜索： a284135-编号：a284155
|
| |
|
|
284133元
|
| 基于5细胞von Neumann邻域，“规则801”定义的二维细胞自动机第n个生长阶段的x轴从左边缘到原点的二进制表示。 |
|
+10
4
|
|
|
|
1, 0, 1, 0, 101, 0, 10101, 0, 1011101, 1000, 101000001, 11100, 10111001001, 10000000, 1010000111101, 110011000, 101110000000001, 100111101100, 10100000011000001, 1111000001100, 1011100110011100001, 1000000001001100, 101000011110100000001, 11001100001001100
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
0,5
|
|
|
评论
|
在零级用单个黑色（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｝]；
代码=801；阶段=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}]；
表[FromDigits[Part[ca[i]][[i]]，Range[1，i]，10]，{i，1，stages-1}]
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,容易的
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A284134号
|
| 基于5细胞von Neumann邻域，“规则801”定义的二维细胞自动机第n个生长阶段的x轴从原点到右边缘的二进制表示。 |
|
+10
4
|
|
|
|
1, 0, 100, 0, 10100, 0, 1010100, 0, 101110100, 1000000, 10000010100, 1110000000, 1001001110100, 1000000, 101111000010100, 1100110000000, 10000000001110100, 1101111001000000, 1000001100000010100, 110000011110000000, 100001110011001110100, 11001000000001000000
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
0,3
|
|
|
评论
|
在零级用单个黑色（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｝]；
代码=801；阶段=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}]；
表[FromDigits[部分[ca[i]][[i]]，范围[i，2*i-1]]，10]，{i，1，阶段-1}]
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,容易的
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A284136号
|
| 基于5细胞von Neumann邻域，“规则801”定义的二维细胞自动机第n个生长阶段的x轴从原点到右边缘的十进制表示。 |
|
+10
4
|
|
|
|
1, 0, 4, 0, 20, 0, 84, 0, 372, 64, 1044, 896, 4724, 64, 24084, 6528, 65652, 56896, 268308, 198528, 1107572, 819264, 4218388, 3283328, 16842868, 16309824, 82057236, 8587136, 359720564, 38568000, 1342201364, 166861184, 5398134900, 825810496, 21611419668
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
0,3
|
|
|
评论
|
在零级用单个黑色（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｝]；
代码=801；阶段=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}]；
表[FromDigits[部分[ca[i]][[i]]，范围[i，2*i-1]]，2]，{i，1，阶段-1}]
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,容易的
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
搜索在0.006秒内完成
|
