New in Wolfram
Mathematica
8: Graph & Network Modeling
◄
previous
|
next
►
Application Areas
Automated Graph Layout
Mathematica
8 integrates fully automated graph layout and provides functions for the aesthetic drawing of graphs.
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]=