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[]:=
HypergraphPlot[{{8,9},{3,2},{7,7},{9,1},{4,5},{10,9,6},{7,5,7},{6,5,1},{10,8,10}},VertexLabelsAutomatic]
Out[]=
In[]:=
RandomWolframModelRule[{{3,3},{2,2}}->{{4,3},{4,2}},4]
Out[]=
{{1,1,1},{2,1,2},{3,1,2},{4,2},{4,4}}{{2,3,4},{2,4,3},{3,2,4},{4,4,4},{1,1},{1,3},{2,2},{3,4}}
In[]:=
RulePlot[WolframModel[%62],VertexLabelsAutomatic]
Out[]=
In[]:=
RandomWolframModelRule[{{1,3},{1,2}}->{{4,3},{4,2}},10]
Out[]=
{{1,2,3},{4,5}}{{2,7,2},{4,6,6},{5,8,3},{9,8,10},{6,5},{6,10},{7,2},{9,2}}
In[]:=
RulePlot[WolframModel[%],VertexLabelsAutomatic]
Out[]=
In[]:=
WolframModel[{{1,2,3},{4,5}}{{2,7,2},{4,6,6},{5,8,3},{9,8,10},{6,5},{6,10},{7,2},{9,2}},{{0,0,0},{0,0}},5]
Out[]=
In[]:=
HypergraphPlot/@%["StatesList"]
Out[]=
In[]:=
ResourceFunction["https://www.wolframcloud.com/obj/user-9df3b05e-786a-4b24-bca6-8ab365cd0d86/DeployedResources/Function/RandomWolframModelRule"]
Out[]=
In[]:=
Out[]=
FunctionRepository`$c9cd8c49e3a64d45b94119f57fb36d7b`FindCanonicalWolframModel[{{5,4,3},{10,6}}{{5,9,8},{4,8,9},{4,5,8},{5,2,5},{5,4},{2,6},{4,1},{3,4}}]
In[]:=
?FindCanonicalWolframModel
Out[]=