Друзья, у меня есть три шейп-файла: первый относится к расположению 35 объектов (они имеют форму точек). Во-вторых, это интересующая область (полигон) и, наконец, шоссе этого места. Я хотел бы использовать пакет листовки, чтобы найти кратчайший путь между этими точками или между одной точкой и другой, но он показан на карте, которая, как мне кажется, может быть предоставлена этим пакетом. , Это возможно ?? Если да, не могли бы вы привести пример того, как это сделать.
Спасибо!
library(geosphere)
#database
df<-structure(list(Properties = c(1,2,3,4,5,6,7,8,9,10), Latitude = c(-23.2, -23.6, -23.9, -23.9, -23.6, -23.5, -23.9, -23.9, -23.6, -23.9),
Longitude = c(-49.6, -49.6, -49.6, -49.4, -49.3, -49.9, -49.3, -49.2, -49.6, -49.9)), class="data.frame",row.names = c(NA, -10L))
#clusters
d<-as.dist(distm(df[,2:1]))
fit.average<-hclust(d,method="average")
clusters<-cutree(fit.average, 4)
#Scatter Plot
suppressPackageStartupMessages(library(ggplot2))
g<-ggplot(df, aes(x=Longitude,y=Latitude, color=factor(clusters)))+ geom_point()