Wolfram Research

Function Repository Resource:

MobileAutomatonPlot

Source Notebook

Visualization of the evolution of a mobile automaton

Contributed by: Stephen Wolfram

ResourceFunction["MobileAutomatonPlot"][evol]

plots the evolution of MobileAutomaton.

Details and Options

Generalized mobile automata are not supported.

Examples

Basic Examples

Plot the evolution of a mobile automaton:

In[1]:=
ResourceFunction["MobileAutomatonPlot"][
 ResourceFunction["MobileAutomaton"][{35, 57}, {Table[0, 21], 10}, 30]]
Out[1]=
In[2]:=
ResourceFunction["MobileAutomatonPlot"][
 ResourceFunction[
   "MobileAutomaton"][{{1, 1, 1} -> {0, 1}, {1, 1, 0} -> {0, 1}, {1, 0, 1} -> {1, -1}, {1, 0, 0} -> {0, -1}, {0, 1, 1} -> {0, -1}, {0,
      1, 0} -> {0, 1}, {0, 0, 1} -> {1, 1}, {0, 0, 0} -> {1, -1}}, {Table[0, 21], 10}, 30], Mesh -> True]
Out[2]=
In[3]:=
ResourceFunction["MobileAutomatonPlot"][
 ResourceFunction[
   "MobileAutomaton"][{{1, 1, 1} -> {{0, 0, 0}, -1}, {1, 1, 0} -> {{1, 0, 1}, -1}, {1, 0, 1} -> {{1, 1, 1}, 1}, {1, 0, 0} -> {{1, 0, 0}, 1}, {0, 1, 1} -> {{0, 0, 0}, 1}, {0, 1, 0} -> {{0, 1, 1}, -1}, {0, 0, 1} -> {{1, 0, 1}, 1}, {0, 0, 0} -> {{1, 1, 1}, 1}}, {Table[0, 41], 20}, 100]]
Out[3]=

Requirements

Wolfram Language 11.3 (March 2018) or above

Resource History

See Also

License Information