Florentine Families Network

Florentine families network in the early 15th century

Sixteen Italian families network in the early 15th century Florence related by marriage.

(15 vertices, 20 edges)

Examples

Basic Examples

Retrieve the graph:

In[1]:=
ResourceData["Florentine Families Network"]
Out[1]=

Summary properties:

In[2]:=
ResourceData["Florentine Families Network", All]["Summary"]
Out[2]=

Basic Applications

Find the most influential family based on centrality:

In[3]:=
g = ResourceData["Florentine Families Network"];
In[4]:=
families = Take[Part[VertexList[g], Ordering[#[g], All, Greater]], 2] & /@ {BetweennessCentrality, ClosenessCentrality, DegreeCentrality, EccentricityCentrality, EigenvectorCentrality, RadialityCentrality, StatusCentrality}
Out[4]=
In[5]:=
HighlightGraph[g, {"Medici"}, PlotTheme -> "Web", VertexStyle -> Red]
Out[5]=

Wolfram Research, "Florentine Families Network" from the Wolfram Data Repository (2019)  

Data Resource History

Source Metadata

Publisher Information