首页
学习
活动
专区
圈层
工具
发布
首页
学习
活动
专区
圈层
工具
MCP广场
社区首页 >问答首页 >将国家水文数据集底图添加到小叶地图

将国家水文数据集底图添加到小叶地图
EN

Stack Overflow用户
提问于 2019-05-16 04:14:24
回答 1查看 93关注 0票数 0

我想将NHD (国家水文数据集)底图(瓦片)添加到我的单张地图中。Here是一个链接,它提供了我正在尝试使用的水文url。

代码语言:javascript
运行
复制
leaflet()%>%
  setView(lng = -76.4, lat = 37, zoom = 09) %>% 
  addWMSTiles(baseUrl="https://basemap.nationalmap.gov/arcgis/rest/services/USGSHydroCached/MapServer",
              layers="Hydrography")

当前返回的底图完全为空。我希望它看起来像this,添加来自其他来源的WMS tiles似乎工作得很好。

EN

回答 1

Stack Overflow用户

回答已采纳

发布于 2019-05-16 21:19:42

选项#1遵循美国地质勘探局的this教程。

grp <- c("USGS Topo", "USGS Imagery Only", "USGS Imagery Topo","USGS Shaded Relief", "Hydrography")

代码语言:javascript
运行
复制
GetURL <- function(service, host = "basemap.nationalmap.gov") {
sprintf("https://%s/arcgis/services/%s/MapServer/WmsServer", host, 
service)}`

opt <- leaflet::WMSTileOptions(format = "image/png", transparent = TRUE)

map <- leaflet::leaflet()
map <- leaflet::addWMSTiles(map, GetURL("USGSHydroCached"),
   group = grp[5], options = opt, layers = "0")

map <- leaflet::hideGroup(map, grp[5])`

选项#2默认情况下,CreateWebMap函数使用inlmisc包添加水文基线图层

票数 0
EN
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接:

https://stackoverflow.com/questions/56156968

复制
相关文章

相似问题

领券
问题归档专栏文章快讯文章归档关键词归档开发者手册归档开发者手册 Section 归档