6

Mathematica で大きな問題が発生しました(バージョン8を使用)。ボロノイ図をプロットするのは簡単ですが、ノルムを変更するのはどうでしょうか?

<< DiscreteMath`ComputationalGeometry`
data2D = {{4.4, 14}, {6.7, 15.25}, {6.9, 12.8}, {2.1, 11.1}, {9.5, 
14.9}, {13.2, 11.9}, {10.3, 12.3}, {6.8, 9.5}, {3.3, 7.7}, {0.6, 
5.1}, {5.3, 2.4}, {8.45, 4.7}, {11.5, 9.6}, {13.8, 7.3}, {12.9, 
3.1}, {11, 1.1}};
DiagramPlot[data2D, LabelPoints -> False]

L_2 ノルム (ユークリッド ノルム) に対応するボロノイ図が表示されます。L_1-norm と L_infinity-norm に対応するダイアグラムも必要です...

4

1 に答える 1

7

Mma ヘルプから(概算のみ):

ここに画像の説明を入力

ここに画像の説明を入力

ColorCombine[{Image[ WatershedComponents[
    DistanceTransform[i, DistanceFunction -> ManhattanDistance]], 
    "Bit"], i, i}]

ここに画像の説明を入力

注意: ボロノイ ポリゴンの凸性プロパティが失われることに注意してください ...

于 2011-10-29T19:59:16.953 に答える