WOLFRAM

Wolfram Language & System Documentation Center

Analyze Social Networks

Analyze the Zachary Karate Club friendship network.

    
Wolfram Language code: g = ExampleData[{"NetworkGraph", "ZacharyKarateClub"}]
Total number of members:
Wolfram Language code: VertexCount[g]
Total number of relations:
Wolfram Language code: EdgeCount[g]
Most popular members:
Wolfram Language code: With[{d = DegreeCentrality[g]}, Pick[VertexList[g], d, Max[d]]]
Top two brokers:
Wolfram Language code: Part[VertexList[g], Reverse[Ordering[BetweennessCentrality[g]]][[ ;; 2]]]
Isolates:
Wolfram Language code: Pick[VertexList[g], DegreeCentrality[g], 0 | 1]