You are using a browser not supported by the Wolfram Cloud
Supported browsers include recent versions of Chrome, Edge, Firefox and Safari.
I understand and wish to continue anyway »
WOLFRAM NOTEBOOK
In[]:=
WolframModel[{{{1,2},{2,3}}{{1,5},{5,2},{5,3},{2,1}}},{{1,2},{2,3}},12]
Out[]=
In[]:=
Graph[Rule@@@%["FinalState"]]
Out[]=
In[]:=
GraphPlot3D[Rule@@@WolframModel[{{{1,2},{2,3}}{{1,5},{5,2},{5,3},{2,1}}},{{1,2},{2,3}},12,"FinalState"]]
Out[]=
In[]:=
GraphPlot3D[Rule@@@WolframModel[{{{1,2},{2,3}}{{1,5},{5,2},{5,3},{2,1}}},{{1,2},{2,3}},14,"FinalState"]]
Out[]=
GraphPlot3D[Rule@@@WolframModel[{{{1,2},{2,3}}{{1,5},{5,2},{5,3},{2,1}}},{{0,0},{0,0}},14,"FinalState"]]