Blättchen Etiketten überlappen fix - Prospekt :: addMarkers

Question

Ich suche nach einem Fix für überlappende Etiketten bei der Verwendung von R-Funktion Broschüre :: addMarkers.

long <- c(147.768, 147.768, 147.768,147.768, 147.768, 147.768) 
lat <- c(-36.852, -36.852, -36.852,-36.852, -36.852, -36.852) 
label <- c('long label1', 'long label2', 'long label3','long label4', 'long label5', 'long label6') 

markers <- data.frame(lat,long,label) 


leaflet() %>% 
    addTiles() %>% # Add default OpenStreetMap map tiles 
    addMarkers(lng=markers$long, lat= markers$lat, 
      popup="The birthplace of R", 
      label = markers$label, 
      labelOptions = labelOptions(noHide = T, direction = 'auto'), 
      clusterOptions = markerClusterOptions() 
      ) 

Answer 1

Sie können die noHide = F statt noHide = T in labelOptions

gesetzt, und Sie versuchen options = markerOptions(riseOnHover = TRUE) hinzufügen, können die Etiketten auf der Markierung zu erhalten.

Schluss Code wäre:

leaflet() %>% 
    addTiles() %>% # Add default OpenStreetMap map tiles 
    addMarkers(lng=markers$long, lat= markers$lat, 
      popup="The birthplace of R", 
      label = markers$label, 
      labelOptions = labelOptions(noHide = F, direction = 'auto'), 
      options = markerOptions(riseOnHover = TRUE), 
      clusterOptions = markerClusterOptions() 
      )