带RggogleMap和传单的离线R地图
我正在尝试在R中创建一个交互式的加拿大离线地图 在做了一些搜索之后,RgoogleMaps和传单似乎是最好的选择。我在这里遵循代码: 这是我的密码:带RggogleMap和传单的离线R地图,r,maps,leaflet,offline,rgooglemaps,R,Maps,Leaflet,Offline,Rgooglemaps,我正在尝试在R中创建一个交互式的加拿大离线地图 在做了一些搜索之后,RgoogleMaps和传单似乎是最好的选择。我在这里遵循代码: 这是我的密码: setwd("C:/Users/user/Documents") library(servr) library(RgoogleMaps) # Load the tiles in working_folder/mapTiles/OSM/ for (zoom in 2:13) GetMapTiles("Canada", zoom = zoom,
setwd("C:/Users/user/Documents")
library(servr)
library(RgoogleMaps)
# Load the tiles in working_folder/mapTiles/OSM/
for (zoom in 2:13)
GetMapTiles("Canada", zoom = zoom,
nTiles = round(c(20,20)/(17-zoom)))
# Start serving working folder on port 8000 in demon mode
deamon_id <- servr::httd(port = 8000, daemon = TRUE)
# Plot with leaflet
library(leaflet)
m = leaflet() %>%
addTiles( urlTemplate =
"http:/localhost:8000/mapTiles/OMS/{z}_{x}_{y}.png")
m = m %>% leaflet::setView(-76, 45 , zoom = 5)
m = m %>% leaflet::addMarkers(-76, 45 )
m
# Stop serving
servr::daemon_stop(deamon_id)
setwd(“C:/Users/user/Documents”)
图书馆(servr)
图书馆(RgoogleMaps)
#在工作文件夹/mapTiles/OSM中加载互动程序/
用于(放大2:13)
GetMapTiles(“加拿大”,缩放=缩放,
nTiles=圆形(c(20,20)/(17缩放)))
#在demon模式下开始为端口8000上的工作文件夹提供服务
执事id%
addTiles(URL模板=
“http:/localhost:8000/mapTiles/OMS/{z}{u{x}{y}.png”)
m=m%>%传单::setView(-76,45,缩放=5)
m=m%>%传单::添加标记(-76,45)
M
#停止发球
servr::守护进程停止(deamon\u id)
Hover,当我放大/缩小地图时,灰色瓷砖会出现在以前没有的地方:
但是,
有什么问题吗?
谢谢大家! nTiles=round(c(20,20)/(17缩放))
这句话不会一成不变。如果您想获得加拿大地图,您可以指定如下边界,而不是指定
nTiles
,您可以这样指定边界:lonR=c(-142,-52),latR=c(41,84)
您能将我的答案标记为正确吗?这是我的第一个答案:)