如何在R中使用WMS?

时间:2016-10-02 09:07:49

标签: r geospatial wms

我喜欢在leaflet()中使用R实现特殊的WMS图层。但是我对使用的WMS层没有成功。

library("leaflet")
library("sp")

# this example from the tutorial works
leaflet() %>% addTiles() %>% setView(-93.65, 42.028, zoom = 4) %>%
  addWMSTiles(
    "http://mesonet.agron.iastate.edu/cgi-bin/wms/nexrad/n0r.cgi",
    layers = "nexrad-n0r",
    options = WMSTileOptions(format = "image/png", transparent = TRUE) 
)

# but for my implementation it don't work
leaflet() %>% addTiles() %>% setView(lat = 53.8, lng = 12.6, zoom = 8) %>% 
  addWMSTiles("http://www.umweltkarten.mv-regierung.de/script/mv_a3_wasserschutz_wms.php?", 
              layers = "t2_bib_p", 
              options = WMSTileOptions(format = "image/png")
)

我认为坐标参考系统存在问题。因为我喜欢使用的WMS层,没有标准的CRS。所以我尝试使用此WMSTileOptions()

进行实验
crs=CRS("+init=epsg:5650")

我们的想法是使用WMS-Layers作为矢量数据的背景图像。矢量数据主要来自形状文件和GPS数据(文本文件)。目的是创建我可以在报告中使用的地图。 如果您知道leaflet旁边的其他可能在R中使用WMS,也欢迎使用?

1 个答案:

答案 0 :(得分:1)

我注意到,如果您调查该基本网址,则说明

  

msWMSDispatch():WMS服务器错误。不完整的WMS请求:VERSION   参数缺失

通过研究网站,我确定正确的格式是:

https://www.umweltkarten.mv-regierung.de/script/mv_a3_wasserschutz_wms.php?SERVICE=WMS&REQUEST=GetCapabilities&VERSION=1.3.0

如果将它放在浏览器中,会产生大量的WMS数据。

我们可以使用"发现"查看哪些图层可供查询。有几个,例如t3_ksgt3_wsglungwms,但t2_bib_p似乎无法使用mv_a3_wasserschutz_wms