あなたはaddTiles
にattribution
引数を追加することができます:たとえば、私はどのように私は「...データソース」のようなものを追加することになり
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))
ことがattribution
引数を受け入れるように表示されませんので、私は、しかし、addProviderTiles
でこれを行う方法を知ってみたい:/
を
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))