In[]:=
MultiwaySystem[WolframModel[{{{x,y},{x,z}}{{x,z},{x,w},{y,w},{z,w}}}],{{0,0},{0,0}},2,"StatesGraph",VertexSize.4]
Out[]=
In[]:=
MultiwaySystem[WolframModel[{{{x,y},{x,z}}{{x,z},{x,w},{y,w},{z,w}}}],{{0,0},{0,0}},3,"StatesGraph",VertexSize1]
Out[]=
In[]:=
MultiwaySystem[WolframModel[{{{x,y},{x,z}}{{x,z},{x,w},{y,w},{z,w}}}],{{0,0},{0,0}},4,"StatesGraph",VertexSize1]
Out[]=
In[]:=
MultiwaySystem[WolframModel[{{{x,y},{x,z}}{{x,z},{x,w},{y,w},{z,w}}}],{{0,0},{0,0}},4,"StatesGraph",VertexSize1]
Out[]=
In[]:=
Graph[MultiwaySystem[WolframModel[{{{x,y},{x,z}}{{x,z},{x,w},{y,w},{z,w}}}],{{0,0},{0,0}},3,"EvolutionGraph"],VertexSize1]
Out[]=
In[]:=
Graph[MultiwaySystem[WolframModel[{{{x,y},{x,z}}{{x,z},{x,w},{y,w},{z,w}}}],{{0,0},{0,0}},3,"EvolutionGraphFull"],VertexSize1]
Out[]=
In[]:=
Graph[MultiwaySystem[WolframModel[{{{x,y},{x,z}}{{x,z},{x,w},{y,w},{z,w}}}],{{0,0},{0,0}},3,"StatesGraph"],VertexSize1]
Out[]=