Javascript R传单自定义属性字符串

使用R

传单

软件包时，如何向属性字符串（即右下角的“传单”|…）添加其他内容

例如，我如何将类似“数据源：…”的内容添加到此地图上的属性文本：

leaflet(data = quakes[1:20,]) %>% 
  addTiles() %>%
  addMarkers(~long, ~lat, popup = ~as.character(mag), label = ~as.character(mag))

---

您可以将

属性

参数添加到

addTiles

：

leaflet(data = quakes[1:20,]) %>% 
  addTiles(attribution = 'I did this, you hear?! Also Leaflet.') %>%
  addMarkers(~long, ~lat, popup = ~as.character(mag), label = ~as.character(mag))

不过，我很想知道如何使用

addProviderTiles

，因为这似乎不接受

属性

参数：/

编辑：好的，我使用提供程序分幅的解决方法是只使用这两个函数。我希望它不会同时调用这两个tile，因为这有点浪费用户带宽，但是嘿，看起来不错

leaflet(data = quakes[1:20,]) %>% 
  addTiles(attribution = 'I did this, you hear?! Also Leaflet.') %>%
  addProviderTiles(providers$OpenStreetMap.Mapnik) %>%
  addMarkers(~long, ~lat, popup = ~as.character(mag), label = ~as.character(mag))

---

您可以将

属性

参数添加到

addTiles

：

leaflet(data = quakes[1:20,]) %>% 
  addTiles(attribution = 'I did this, you hear?! Also Leaflet.') %>%
  addMarkers(~long, ~lat, popup = ~as.character(mag), label = ~as.character(mag))

不过，我很想知道如何使用

addProviderTiles

，因为这似乎不接受

属性

参数：/

编辑：好的，我使用提供程序分幅的解决方法是只使用这两个函数。我希望它不会同时调用这两个tile，因为这有点浪费用户带宽，但是嘿，看起来不错

leaflet(data = quakes[1:20,]) %>% 
  addTiles(attribution = 'I did this, you hear?! Also Leaflet.') %>%
  addProviderTiles(providers$OpenStreetMap.Mapnik) %>%
  addMarkers(~long, ~lat, popup = ~as.character(mag), label = ~as.character(mag))

---

正如@rensa所怀疑的，他们的第二个选项确实嵌入并获取了这两个磁贴集。但是，设置一个空白的URL模板似乎会阻止它：

leaflet(data = quakes[1:20,]) %>% 
  addProviderTiles(providers$OpenStreetMap.Mapnik) %>%
  addTiles(urlTemplate = "", attribution = 'I did this, you hear?! Also Leaflet.')

---

正如@rensa所怀疑的，他们的第二个选项确实嵌入并获取了这两个磁贴集。但是，设置一个空白的URL模板似乎会阻止它：

leaflet(data = quakes[1:20,]) %>% 
  addProviderTiles(providers$OpenStreetMap.Mapnik) %>%
  addTiles(urlTemplate = "", attribution = 'I did this, you hear?! Also Leaflet.')

---

我到处找这个，谢谢！我到处找这个，谢谢！