Centrality and prestige of Florentine families

Example 4 steps, run in order in one session. Every step was executed against the engine and the output below is what it produced.

Step 1

g = ExampleData[{"NetworkGraph", "FlorentineFamilies"}]

Output

ExampleData[{NetworkGraph, FlorentineFamilies}]

Step 2

Part[VertexList[g], Ordering[EigenvectorCentrality[g], All, Greater]]

Output

VertexList[ExampleData[{NetworkGraph, FlorentineFamilies}]]

Step 3

Part[VertexList[g], Ordering[ClosenessCentrality[g], All, Greater]]

Output

VertexList[ExampleData[{NetworkGraph, FlorentineFamilies}]]

Step 4

Part[VertexList[g], Ordering[BetweennessCentrality[g], All, Greater]]

Output

VertexList[ExampleData[{NetworkGraph, FlorentineFamilies}]]

Functions used