Novos Recursos do
Mathematica
8: Análises de Grafos & Redes
◄
anterior
|
próximo
►
Áreas de Aplicação
Subtraia bairros aleatórios
O
Mathematica
8 fornece funções para computar subgrafos e grafos de bairros.
In[1]:=
X
graph = GridGraph[{25, 50}];
In[2]:=
X
Subgraph[graph, Complement[VertexList[graph], VertexList[ NeighborhoodGraph[graph, RandomSample[VertexList[graph], 20], 1]]], ImageSize -> 500]
Out[2]=