R 中的交互式方向图
Interactive Direction Maps in R
我可以使用下面的 Rscript 检索方向图,但我找不到使其具有交互性的函数。
longitude <- c( 77.605855,77.606800,77.596843,77.575793 )
latitude <- c(12.956580,12.966157, 12.964777,12.964473)
d <- as.data.frame(cbind(longitude,latitude))
map <- get_googlemap(center = c(lon = 77.605855, lat = 12.956580), zoom = 14,
size = c(500, 500), scale = 2,maptype = c("roadmap"),markers = d, path = d)
以下是我的地图中需要具备的功能。
1. 交互式缩放。
2. 自动居中,使所有标记可见。
3. OnClick 我想显示标题的标记 - 例如。 "This is Your Car"。
@SymbolixAU 在评论中提到的文档 leaflet
帮助我找到了解决方案,下面是我的代码来解决我在问题中提到的要求。
library(leaflet)
longitute <-c(77.605855,77.606800,77.596843,77.596747,77.596296,77.595738,77.594944 )
latitude <- c(12.956580,12.966157, 12.964777,12.964323,12.963570,12.962964, 12.962399)
d <- as.data.frame(cbind(longitute,latitude))
m <- leaflet() %>%
addTiles() %>% # Add default OpenStreetMap map tiles
addMarkers(lng=d$longitute, lat=d$latitude, popup="New Point",)
m<- addPolylines(m , lng = d$longitute, lat = d$latitude)
m
所以这是我的输出。
我可以使用下面的 Rscript 检索方向图,但我找不到使其具有交互性的函数。
longitude <- c( 77.605855,77.606800,77.596843,77.575793 )
latitude <- c(12.956580,12.966157, 12.964777,12.964473)
d <- as.data.frame(cbind(longitude,latitude))
map <- get_googlemap(center = c(lon = 77.605855, lat = 12.956580), zoom = 14,
size = c(500, 500), scale = 2,maptype = c("roadmap"),markers = d, path = d)
以下是我的地图中需要具备的功能。
1. 交互式缩放。
2. 自动居中,使所有标记可见。
3. OnClick 我想显示标题的标记 - 例如。 "This is Your Car"。
@SymbolixAU 在评论中提到的文档 leaflet
帮助我找到了解决方案,下面是我的代码来解决我在问题中提到的要求。
library(leaflet)
longitute <-c(77.605855,77.606800,77.596843,77.596747,77.596296,77.595738,77.594944 )
latitude <- c(12.956580,12.966157, 12.964777,12.964323,12.963570,12.962964, 12.962399)
d <- as.data.frame(cbind(longitute,latitude))
m <- leaflet() %>%
addTiles() %>% # Add default OpenStreetMap map tiles
addMarkers(lng=d$longitute, lat=d$latitude, popup="New Point",)
m<- addPolylines(m , lng = d$longitute, lat = d$latitude)
m
所以这是我的输出。