搜索： a280144-编号：a280144
|
| |
|
|
A280141型
|
| 基于5细胞von Neumann邻域，“规则241”定义的二维细胞自动机第n个生长阶段的x轴从左边缘到原点的二进制表示。 |
|
+10
4
|
|
|
|
1, 0, 111, 0, 11111, 0, 1111111, 0, 111111111, 1000, 11111110111, 1000, 1111111111111, 10001000, 111111101111111, 11001000, 11111111101010111, 100111001000, 1111111011101011111, 110001011000, 111111111011100011111, 1001110011000000, 11111110111011000111111
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
0,3
|
|
|
评论
|
在零级用单个黑色（ON）单元初始化。
|
|
|
参考文献
|
S.Wolfram，《一种新的科学》，Wolfram Media，2002年；第170页。
|
|
|
链接
|
|
|
|
数学
|
CAStep[rule_，a_]：=映射[rule[[10-#]]&，ListConvolve[{{0，2，0}，{2，1，2}，}，a，2]，{2}]；
代码=241；阶段=128；
rule=整数位数[代码，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,容易的
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A280142型
|
| 基于5细胞von Neumann邻域，“规则241”定义的二维细胞自动机第n个生长阶段的x轴从原点到右边缘的二进制表示。 |
|
+10
4
|
|
|
|
1, 0, 111, 0, 11111, 0, 1111111, 0, 111111111, 1000000, 11101111111, 100000000, 1111111111111, 10001000000, 111111101111111, 1001100000000, 11101010111111111, 100111001000000, 1111101011101111111, 11010001100000000, 111110001110111111111, 1100111001000000
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
0,3
|
|
|
评论
|
在零级用单个黑色（ON）单元初始化。
|
|
|
参考文献
|
S.Wolfram，《一种新的科学》，Wolfram Media，2002年；第170页。
|
|
|
链接
|
|
|
|
数学
|
CAStep[rule_，a_]：=映射[rule[[10-#]]&，ListConvolve[{{0，2，0}，{2，1，2}，}，a，2]，{2}]；
代码=241；阶段=128；
rule=整数位数[代码，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,容易的
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A280143型
|
| 基于5细胞von Neumann邻域，“规则241”定义的二维细胞自动机第n个生长阶段的x轴从左边缘到原点的十进制表示。 |
|
+10
4
|
|
|
|
1, 0, 7, 0, 31, 0, 127, 0, 511, 8, 2039, 8, 8191, 136, 32639, 200, 130903, 2504, 522079, 3160, 2094879, 40128, 8353343, 52680, 33521247, 641496, 133651487, 843752, 536334383, 10274720, 2138406463, 13418964, 8581372959, 163889616, 34214895127, 217432276
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
0,3
|
|
|
评论
|
在零级用单个黑色（ON）单元初始化。
|
|
|
参考文献
|
S.Wolfram，《一种新的科学》，Wolfram Media，2002年；第170页。
|
|
|
链接
|
|
|
|
数学
|
CAStep[rule_，a_]：=映射[rule[[10-#]]&，ListConvolve[{{0，2，0}，{2，1，2}，}，a，2]，{2}]；
代码=241；阶段=128；
rule=整数位数[代码，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]，2]，{i，1，stages-1}]
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,容易的
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
搜索在0.004秒内完成
|
