Basic Examples
Basic Examples
Retrieve the graph:
In[]:=
ResourceData["2-Fat Ring Graph with 500 vertices"]
Out[]=
Graph
Summary properties:
In[]:=
ResourceData["2-Fat Ring Graph with 500 vertices",All]["Summary"]
Out[]=
Name | 2-Fat Ring Graph with 500 vertices |
VertexCount | 500 |
EdgeCount | 23191 |
Description | The Second DIMACS Implementation Challenge: 1992-1993 |
ByteCount |
Basic Applications
Basic Applications
Find the maximum clique:
In[]:=
g=ResourceData["2-Fat Ring Graph with 500 vertices"];
In[]:=
maxclique=FindClique[g]
Out[]=
{{1,2,17,18,33,34,49,50,65,66,81,82,97,98,113,114,129,130,145,146,161,162,177,178,193,194,209,210,225,226,241,242,257,258,273,274,289,290,305,306,321,322,337,338,353,354,369,370,385,386,401,402,417,418,433,434,449,450,465,466,481,482,497,498}}
Show the maximum clique:
HighlightGraphg,Subgraph[g,maxclique],,
Out[]=