R addWMSTiles don'；不渲染

我试图通过

addWMSTiles

（德国的EQ风险）在R传单中使用特定的瓷砖服务

但是，它不工作，因为没有渲染任何内容

代码如下：

library(leaflet)

map <- leaflet()   %>%
  addProviderTiles(providers$Stamen.TonerLite,group="StamenTonerLite")

wmsserv <- "https://www.gisimmorisknaturgefahren.de/erdbeben_tile"
map <- addWMSTiles(map, wmsserv, layers="erdbeben_tile", options=WMSTileOptions(Format="image/png", TRANSPARENT=TRUE, CRS="EPSG:25832", opacity=0.6))

图书馆（传单）
映射%
addProviderTiles（提供者$Stamen.TonerLite，group=“StamenTonerLite”）
wmsserv帮助其他用户通过解释上述代码不起作用的方式来帮助您。你期望发生什么，实际发生了什么？你如何运行你的代码？你确定URL吗？？它看起来不像是WMST服务的有效url我试图从这个链接/图像中提取信息：你以前问过这个吗？