This defines a small graph: Needs["GraphUtilities`"]
| Out[2]= |  |
This finds that the network is grouped into two communities:
| Out[3]= |  |
This shows which vertex is in which community:
| Out[4]= |  |
This plots the graph, coloring the vertices based on community assignment:
| Out[5]= |  |
|