Basic Examples 
(5)
 

Four steps of the MU-Riddle:
In[98]:=
[◼]
HofstadterMURiddle
[4]
Out[98]=
{MIMII,MIMIU,MIIMIIII,MIIMIIU,MIUMIUIU,MIIIIMIIIIIIII,MIIIIMUI,MIIIIMIU,MIIIIMIIIIU,MIIUMIIUIIU,MIUIUMIUIUIUIU,MIIIIIIIIMIIIIIIIIIIIIIIII,MIIIIIIIIMUIIIII,MIIIIIIIIMIUIIII,MIIIIIIIIMIIUIII,MIIIIIIIIMIIIUII,MIIIIIIIIMIIIIUI,MIIIIIIIIMIIIIIU,MIIIIIIIIMIIIIIIIIU,MUIMUIUI,MUIMUIU,MIUMIUIU,MIIIIUMIIIIUIIIIU,MIIIIUMUIU,MIIIIUMIUU,MIIUIIUMIIUIIUIIUIIU,MIUIUIUIUMIUIUIUIUIUIUIUIU}
———
Make a graph of steps of the MU-Riddle:
In[349]:=
GraphPlot​​
[◼]
HofstadterMURiddle
[4]
Out[349]=
———
Add labels and plot the graph with a different
Method
:
In[101]:=
GraphPlot​​
[◼]
HofstadterMURiddle
[3],Method->"LinearEmbedding",​​VertexLabels->"Name"
Out[101]=
———
Make edges directed:
In[105]:=
GraphPlot​​
[◼]
HofstadterMURiddle
[5],Method->"RadialDrawing",​​VertexLabels->None,DirectedEdges->True
Out[105]=
———
Choose other methods to get additional viewings of the graph:
In[106]:=
GraphPlot​​
[◼]
HofstadterMURiddle
[4],Method->"LayeredDigraphDrawing",​​VertexLabels->"Name",DirectedEdges->True
Out[106]=
In[108]:=
GraphPlot​​
[◼]
HofstadterMURiddle
[4],Method->"SpringEmbedding",​​VertexLabels->"Name",DirectedEdges->True
Out[108]=