GraphCenter

As of Version 10, most of the functionality of the Combinatorica package is built into the Wolfram System. »

GraphCenter[g]

gives a list of the vertices of graph with minimum eccentricity.

Details and Options

GraphCenter functionality is now available in the built-in Wolfram Language function GraphCenter.
To use GraphCenter, you first need to load the Combinatorica Package using Needs["Combinatorica`"].

Wolfram Language code: Needs["Combinatorica`"]

Wolfram Language code: g = FromUnorderedPairs[{{1, 2}, {2, 3}, {3, 4}, {4, 5}, {1, 5}, {1, 6}}];

Wolfram Language code: ShowGraph[g]

Wolfram Language code: GraphCenter[g]

This function has been superseded by GraphCenter in the Mathematica kernel:

Wolfram Language code: g = Graph[UndirectedEdge@@@{{1, 2}, {2, 3}, {3, 4}, {4, 5}, {1, 5}, {1, 6}}]

Wolfram Language code: GraphCenter[g]

Top