5

ここ数日間、基本レイヤー タイル「OSM」と「Stamen.TonerLite」(マップの標準タイルとして 1 年以上使用しています) が正しく表示されません。つまり、それらを切り替えることができなくなりました。 .

マップが RStudio と RStudio Viewer に表示されている限り、すべてが完全に機能します。ただし、ブラウザーで .Rmd-output の対応する .html ファイルを開くとすぐに (Chrome、Internet Explorer、Edge、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
```

ここに画像の説明を入力

ここに画像の説明を入力

4

1 に答える 1

5

これを試してください。ポイントは、2 つのプロバイダー タイルを addTiles() 引数にパイプすることです。

---
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
```
于 2017-07-28T12:47:59.273 に答える