Novos Recursos do
Mathematica
8: Grafos & Modelagem de Redes
◄
anterior
|
próximo
►
Áreas de Aplicação
Layout gráfico automatizado
O
Mathematica
8 integra layout gráfico completamente automatizado e fornece funções para o desenho estético de grafos.
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]=