« View all new features in
Mathematica
9
◄
previous
|
next
►
New in
Mathematica
9
›
3D Volumetric Image Processing
Evolution of a 3D Cellular Automaton
Animate the evolution of a 3D cellular automaton.
In[1]:=
X
ListAnimate[ Image3D[#, ImageSize -> 300] & /@ CellularAutomaton[{14, {2, 1}, {1, 1, 1}}, {{{{1}}}, 0}, 8]]
Play Animation
»
Stop Animation
»