R Leaflet пользовательская строка атрибуции

1

При использовании пакета leaflet R, как я могу добавить что-то дополнительное к строке атрибуции (например, "Листовка..." в нижнем правом углу)?

Например, я хотел бы добавить что-то вроде "источника данных:..." к тексту атрибуции на этой карте:

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

2 ответа

2
Лучший ответ

Вы можете добавить аргумент attribution в 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, потому что это не соответствует аргументу attribution :/

EDIT: хорошо, мое обходное решение для использования плиток поставщика должно было использовать обе функции. Надеюсь, на самом деле это не называет обе плитки, так как это пустая трата пользовательской пропускной способности, но эй, это выглядит хорошо!

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))
0

Как подозревает @rensa, их второй вариант действительно вставляет и извлекает оба набора плит. Однако установка пустой urlTemplate, похоже, останавливает ее:

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

Ещё вопросы

Сообщество Overcoder
Наверх
Меню