Bridges

バージョン10で，Combinatorica パッケージの機能のほとんどがWolframシステムに組み込まれた． »

Bridges[g]

グラフ g の橋のリストを与える．ここでそれぞれの橋は，削除することによりグラフが非連結となるような辺である．

詳細とオプション

Bridgesの機能はWolfram言語の組込み関数FindMinimumCutで利用できるようになった．
Bridgesを使うためには，まず Combinatorica パッケージをロードしなくてはならない．それには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: Bridges[g]

Bridgesの代りにFindMinimumCutが使われるようになった：

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

Wolfram Language code: {v1, v2} = Last[FindMinimumCut[g]];

Wolfram Language code: EdgeList[g, v_w_ /; MemberQ[v1, v] && MemberQ[v2, w]]

Top