リーフレットレイヤーブラウザで.html（= .Rmd出力）を開くと切り替えられません

Question

数日間、基本レイヤーに「OSM」と「Stamen.TonerLite」のタイルがタイルに貼り付けられています私の地図の標準的なタイルとして）は正しく表示されません - それはもはやそれらを切り替えることは不可能です。

地図がRStudioとRStudio Viewerに表示されている限り、すべてが完全に機能します。しかし、ブラウザで.Rmd出力の対応する.htmlファイル（私はクロム、インターネットエクスプローラ、エッジとFirefoxを試しました）を開くとすぐに、タイルを切り替えることはできません。 「OSM」が表示され、「Stamen.TonerLite」に切り替えることはできず、その逆もありません。
私は、異なるレイヤータイルまたは2つ以上のレイヤータイルを試しましたが、同じ結果が得られました。私が他のものに切り替えるときにも、常に1つのレイヤータイルしか表示されません。私の場合のための

再現例：

--- 
title: "stackoverflow" 
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には、2枚のプロバイダタイル（）の引数

でパイプにあり、これを試してみてください

--- 
title: "stackoverflow" 
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 
```