Rで１次元セルオートマトン（続き）

Rで１次元セルオートマトンの続きです。来週からの１年生に演習用に、１次元セルオートマトンをRでシミュレートするプログラムを作成。ルール番号をRのコードに自分でインプットしないといけないですが、全自動だと教育的でないので。あとは、いろんなルール番号でフラクタル次元を求めてみるとか、車の渋滞をシミュレートするにはどういうルールだといいのか、とか、１年生レベルで実験できそうです。こちらの想定を超えたものを持ってくる学生がいれば楽しいですが、果たしてどうか？

右の図は、５０サイトの１次元格子に確率３０％で１を並べ、ルール１８４で右に１を移動した様子。ルール１８４は車の移動を模したもので、前に車がいると移動せず、車がいないなら移動するという最も単純なもの。いわゆるTASEP（完全=Totally 非対称=Asymmetric 単純=Simple 自己排除=Exclusion 過程=Process）と呼ばれるもの。確率５０％以上で車を配置すると渋滞が始まることが知られているのですが。

今回作成したファイル：CA.R