WolframModelPlot[WolframModel[XXXXX,"CausalGraph"],"BranchialGraph"]
WolframModelPlot[MultiwaySystem[WolframModel[XXXXX]],"BranchialGraph"]
In[]:=
MultiwaySystem[WolframModel[{{x,y},{x,z}}{{x,z},{x,w},{y,w},{z,w}}],{{{0,0},{0,0}}},3,"StateBranchialGraph",VertexSize1]
Out[]=
In[]:=
MultiwaySystem[WolframModel[{{x,y},{x,z}}{{x,z},{x,w},{y,w},{z,w}}],{{{0,0},{0,0}}},4,"StateBranchialGraph",VertexSize2]
Out[]=
Strings
Strings
In[]:=
Table[MultiwaySystem[{"A""AB","B""A"},"A",t,"StateBranchialGraph"],{t,2,5}]
Out[]=
In[]:=
Table[MultiwaySystem[{"A""AB","B""A"},"A",t,"StateBranchialGraphStructure"],{t,2,10}]
Out[]=