如何在R中使用WMS？

Question

我想用leaflet()in 实现一个特殊的WMS层R.但我对我喜欢使用的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的其他可能性,也欢迎吗？

Answer 1

我注意到，如果你调查那个基本 URL，它会说

msWMSDispatch()：WMS 服务器错误。WMS 请求不完整：缺少 VERSION 参数

通过研究该网站，我确定正确的格式是：

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

如果将其放入浏览器中，会产生大量 WMS 数据。

我们可以使用“查找”来查看哪些图层可以查询。t3_ksg有、t3_wsg、 、 等几种lungwms，但似乎t2_bib_p不适用于mv_a3_wasserschutz_wms。