Noch detailliertere Graphen
Das Zeichnen von Graphen und Netzwerken ist nun noch detailgetreuer.
In[1]:=

SocialMediaData["Facebook", "FriendNetwork"]
Out[1]=

In[2]:=

CommunityGraphPlot[SocialMediaData["Facebook", "FriendNetwork"],
CommunityLabels -> {"Online friends",
"High school\n Local area friends", "Family"}]
Out[2]=

Das Prestige Florentiner Familien.
Den kompletten Wolfram Language-Input zeigen
In[4]:=

Graph[ExampleData[{"NetworkGraph", "FlorentineFamilies"}], style]
Out[4]=
