مثال 3 خطوات تُشغَّل بالترتيب في جلسة واحدة. كل خطوة نُفِّذت على المحرك والمخرج أدناه هو ما أنتجته.
g = ExampleData[{"NetworkGraph", "FamilyGathering"}];لا مخرجات - هذه الخطوة تجهّز شيئًا للخطوة التالية.
Part[VertexList[g], Ordering[EigenvectorCentrality[g], All, Greater]]VertexList[ExampleData[{NetworkGraph, FamilyGathering}]]cc = DegreeCentrality[g];
HighlightGraph[g, Table[Style[VertexList[g][[i]], ColorData["TemperatureMap"][cc[[i]] / Max[cc]]], {i, VertexCount[g]}], ImageSize -> 300]HighlightGraph[ExampleData[{NetworkGraph, FamilyGathering}], Table[VertexList[g][[i]], {i, VertexCount[g]}], ImageSize -> 300]