Representación gráfica de máquinas de Turing
Represente gráficamente la evolución y el ícono de regla de una máquina de Turing comenzando con una cinta en blanco para diez pasos.
In[1]:=
RulePlot[TuringMachine[2506], {1, {{}, 0}}, 10, PlotLegends -> "Icon",
ImageSize -> 300]
Out[1]=