volantino con R: aggiungere etichette di testo

Question

Questo codice è tratto dal this page:

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

Invece di marcatori, c'è qualche modo per tracciare mag come etichette di testo?

Answer 1

UPDATE

Quando questa risposta è stata pubblicata, penso addLabelOnlyMarkers() non è stato ufficialmente incluso nella versione CRAN. A partire dall'8 gennaio 2018, il volantino è in versione 1.1.0 su CRAN. Questa versione ha la funzione. Non c'è bisogno di scaricare una versione github.

RISPOSTA ORIGINALE

Se avete il pacchetto leaflet installato da GitHub, si può fare

leaflet(data = quakes[1:20,]) %>% addTiles() %>% 
    addLabelOnlyMarkers(~long, ~lat, label = ~as.character(mag), 
         labelOptions = labelOptions(noHide = T, direction = 'top', textOnly = T)) 

---

La funzione addPopups potrebbe essere una soluzione utile se si non voglio lavorare con la versione del pacchetto di GitHub . (Questo è stato il caso prima del rilascio ufficiale del addLabelOnlyMarkers() nella versione CRAN.)

leaflet(data = quakes[1:20,]) %>% addTiles() %>% 
     addPopups(~long, ~lat, ~as.character(mag), 
     options = popupOptions(minWidth = 20, closeOnClick = FALSE, closeButton = FALSE)) 

Answer 2

È possibile aggiungere statico/librarsi etichette ai marcatori

https://github.com/rstudio/leaflet/blob/master/inst/examples/labels.R

Demo http://rpubs.com/bhaskarvk/leaflet-awesome-markers http://rpubs.com/bhaskarvk/leaflet-label