Basic Examples
Basic Examples
Retrieve the graph:
In[]:=
ResourceData["J(32,2,4) Generalized Johnson Graph"]
Out[]=
Summary properties:
In[]:=
ResourceData["J(32,2,4) Generalized Johnson Graph",All]["Summary"]
Out[]=
Name | J(32,2,4) Generalized Johnson Graph |
VertexCount | 70 |
EdgeCount | 1855 |
Description | The Second DIMACS Implementation Challenge: 1992-1993 |
ByteCount |
Basic Applications
Basic Applications
Find the maximum clique:
In[]:=
g=ResourceData["J(32,2,4) Generalized Johnson Graph"];
In[]:=
maxclique=FindClique[g]
Out[]=
{{3,6,15,18,22,30,32,39,41,49,53,56,65,68}}
Show the maximum clique:
HighlightGraphg,Subgraph[g,maxclique],,
Out[]=