Новое в системе Wolfram
Mathematica
8: Анализ графов и сетей
◄
предыдущая
|
следующая
►
Прикладные области
Изучение городских дорожных сетей
Сочетание возможностей
WolframAlpha
и функциональности системы
Mathematica
8 по обработке изображений для построения и анализа дорожных сетей. В этом примере находится окрестность точки на городской карте.
In[1]:=
X
image = WolframAlpha["Champaign IL", {{"Map:CityData", 1}, "Image"}];
In[2]:=
X
graph = MorphologicalGraph[Binarize[ColorNegate[image]], EdgeStyle -> Gray];
In[3]:=
X
Row[{image, Spacer[20], HighlightGraph[graph, NeighborhoodGraph[graph, 1800, 10], ImageSize -> {256, 278}, VertexSize -> {1800 -> 10}]}]
Out[3]=