KirchhoffGraph
In[]:=
RulePlot[WolframModel[{{x,y},{x,z}}{{x,z},{x,w},{y,w},{z,w}}],VertexLabelsAutomatic]
Out[]=
In[]:=
Graph[Rule@@@WolframModel[{{x,y},{x,z}}{{x,z},{x,w},{y,w},{z,w}},{{1,2},{1,3}},8,"FinalState"]]
Out[]=
In[]:=
KirchhoffMatrixUndirectedGraph
Out[]=
In[]:=
MatrixPlot[%]
Out[]=
In[]:=
Histogram[Abs[Eigenvalues[%33]]]
Out[]=
In[]:=
NeighborhoodGraph
,50,2,VertexLabelsAutomatic
Out[]=
Symmetries
Symmetries
What is the collection of local neighborhoods?
Sphere
Sphere