多语言展示
当前在线:758今日阅读:22今日分享:22

对分段的线性元胞自动机组的变化过程的演示

本文的元胞自动机,是共线的,但不是一条线段,而是断为两条以上的线段。
工具/原料
1

电脑

2

Mathematica

方法/步骤
1

元胞组成3个断开的线段:b = Table[   If[m == 5 && Or[-17 < n < -13, -10 < n < -2, 0 < n < 5], 1, 0],    {m, -20, 30}, {n, -30, 30}];

3

线性元胞组33733经过76步,趋于稳定。

4

线性元胞组9、4、10、5、3:b = Table[   If[m == 5 && Or[-16 < n < -6, -3 < n < 8, 12 < n < 16], 1,     0], {m, -20, 30}, {n, -30, 30}];

5

9、4、10、5、3能够生成一个叫做tumbler的部件。

注意事项

由于这类元胞自动机,大多数都需要巨大的空间。所以,用Mathematica来演示,显得力不从心。

推荐信息