WOLFRAM

Wolfram言語 ＆ システムドキュメントセンター

フィレンツェ一族の名声

メディチ家は，最大の富を持っていたわけでも，議会で最も多くの席を持っていたわけでもなかったが，権力の座に就いた．婚姻を通して，メディチ家はソーシャルネットワークの中心性の位置を持っていた．この中心性は，通信，取引の仲介等において大変重要であった．

Wolfram Language code: g = ExampleData[{"NetworkGraph", "FlorentineFamilies"}]
メディチ家は，広い人脈を持つ他の家族と繋がりがあった：
Wolfram Language code: Part[VertexList[g], Ordering[EigenvectorCentrality[g], All, Greater]]
メディチ家は，相対的に他の家族に近い：
Wolfram Language code: Part[VertexList[g], Ordering[ClosenessCentrality[g], All, Greater]]
メディチ家が伝達される情報を伏せたり，歪めて伝えたりすることは簡単であった：
Wolfram Language code: Part[VertexList[g], Ordering[BetweennessCentrality[g], All, Greater]]
最も高い中心性の値を持つ2つの家族をハイライトする：