Новое в системе Wolfram
Mathematica
9
◄
предыдущая
|
следующая
►
Новое в системе Wolfram
Mathematica
9
›
Расширенная поддержка графов и сетей
Разбиения графов и разрезы
Равномерное распределение данных или процессов по сетке процессоров, при минимальном информационном обмене.
In[1]:=
X
mesh = AdjacencyGraph[ ExampleData[{"Matrix", "HB/blckhole"}, "Matrix"], VertexShapeFunction -> None, EdgeShapeFunction -> (Line[#] &), GraphLayout -> "SpectralEmbedding"]
Out[1]=
In[2]:=
X
Short[FindGraphPartition[mesh, 4]]
Out[2]//Short=
Цветовое выделение разбиения сетки процессоров.
In[3]:=
X
Short[FindGraphPartition[mesh, 4]]; HighlightGraph[mesh, Subgraph[mesh, #] & /@ %, GraphHighlightStyle -> "DehighlightHide"]
Out[3]=