Grafos do vizinho mais próximo
Gere o grafo de vizinho mais próximo de uma coleção de dados arbitrários com a nova função NearestNeighborGraph na versão 11.
Construa o grafo do vizinho mais próximo para os países da América do Sul.
In[1]:=
![Click for copyable input](assets.pt-br/nearest-neighbor-graphs/In_9.png)
locs = CountryData["SouthAmerica"];
coords = EntityValue[locs, "Position"][[All, 1, {2, 1}]];
In[2]:=
![Click for copyable input](assets.pt-br/nearest-neighbor-graphs/In_10.png)
g = NearestNeighborGraph[locs, VertexCoordinates -> coords]
Out[2]=
![](assets.pt-br/nearest-neighbor-graphs/O_8.png)
Estilize a rede na parte superior do continente.
mostre o input completo da Wolfram Language
In[4]:=
![Click for copyable input](assets.pt-br/nearest-neighbor-graphs/In_12.png)
Graph[g, opts]
Out[4]=
![](assets.pt-br/nearest-neighbor-graphs/O_9.png)
Mostre o grafo dos 3 vizinhos mais próximos para uma coleção de cores aleatórias.
In[5]:=
![Click for copyable input](assets.pt-br/nearest-neighbor-graphs/In_13.png)
colors = RandomColor[50]
Out[5]=
![](assets.pt-br/nearest-neighbor-graphs/O_10.png)
In[6]:=
![Click for copyable input](assets.pt-br/nearest-neighbor-graphs/In_14.png)
NearestNeighborGraph[colors, 3, VertexShapeFunction -> "Name"]
Out[6]=
![](assets.pt-br/nearest-neighbor-graphs/O_11.png)