WOLFRAM

Wolfram言語 ＆ システムドキュメントセンター

3Dセルオートマトンの進化

3Dセルオートマトンの進化をアニメーションにする．

Wolfram Language code: ListAnimate[Image3D[#, ImageSize -> 300]& /@ CellularAutomaton[{14, {2, 1}, {1, 1, 1}}, {{{{1}}}, 0}, 8]]