Новое в системе Wolfram
Mathematica
8: Моделирование графов и сетей
◄
предыдущая
|
следующая
►
Прикладные области
Автоматизировання компоновка графов
Система
Mathematica
8 включает полностью автоматизированную компоновку графов и предоставляет функции для эстетической прорисовки графов.
In[1]:=
X
layout = {Automatic, "CircularEmbedding", "HighDimensionalEmbedding", "LayeredDrawing", "RandomEmbedding", "SpiralEmbedding", "SpringElectricalEmbedding", "SpringEmbedding"};
In[2]:=
X
Grid[Flatten[{Style[#, 9, FontFamily -> "Verdana"] & /@ #, Table[PetersenGraph[6, 3, GraphLayout -> l, ImageSize -> {125, 125}], {l, #}]} & /@ Partition[layout, 4, 4, 1], 1], Frame -> {All, {True, False, True, False}}, FrameStyle -> LightGray, Spacings -> {1, {{2, 1}}}]
Out[2]=