Given:
CommunityGraphPlot[ ExampleData[{"NetworkGraph", "DolphinSocialNetwork"}]]
I like to identify:
- The edges between each pair of communities;
- In the context of a weighted network, find out the weights associated with the edges in (1); and
- Combining all the communities in a single weighted adjacency matrix in which the edge weights between the communities are set to zero.