当使用浏览器打开 .html（= .Rmd 输出）时，Leaflet Layer Tiles 不可切换

Question

几天来，基本图层图块 "OSM" 和 "Stamen.TonerLite"（我已经将其用作我的地图的标准图块一年多了）没有正确显示 – 即它是不可能再在它们之间切换。

只要地图显示在 RStudio 和 RStudio Viewer 中，一切都完美无缺。但是，一旦我在浏览器中打开 .Rmd 输出的相应 .html 文件（我尝试了 chrome、Internet Explorer、Edge 和 Firefox），就不可能再在两者之间切换瓷砖。显示 "OSM"，我无法切换到 "Stamen.TonerLite"，反之亦然。
我尝试过不同层的瓷砖或超过 2 层的瓷砖，但结果相同。即使我切换到其他层，也总是只有一层图块可见。

我的案例的可重现示例：

---
title: "Whosebug"
author: " "
date: " "
output: html_document
---

```{r, echo = T}
library(leaflet)

m <- leaflet() %>%
     addTiles(group = "OSM") %>%
     addProviderTiles("Stamen.TonerLite") %>%
     addLayersControl(baseGroups = c("OSM", "Stamen.TonerLite")) %>%
     addCircleMarkers(lat = 47.4,
                      lng = 9.37,
                      radius = 10,
                      fillOpacity = 1.0)
m
```

Answer 1

试试这个，重点是将两个提供者图块通过管道传递给 addTiles() 参数

---
title: "Whosebug"
author: " "
date: " "
output: html_document
---

```{r, echo = T}
library(leaflet)

m <- leaflet() %>%
 addTiles() %>%
 addProviderTiles(providers$OpenStreetMap, group = "OSM") %>%
 addProviderTiles(providers$Stamen.TonerLite, group = "Toner Lite") %>%
 addLayersControl(baseGroups = c("OSM", "Toner Lite")) %>%
 addCircleMarkers(lat = 47.4,
                  lng = 9.37,
                  radius = 10,
                  fillOpacity = 1.0)
m
```

当使用浏览器打开 .html（= .Rmd 输出）时，Leaflet Layer Tiles 不可切换

Leaflet Layer Tiles not switchable when .html (= .Rmd output) is opened with browser

html

r

knitr

r-leaflet