單張標籤重疊修復 - 宣傳單:: addMarkers

Question

我在尋找修復重疊標籤時使用R功能leaflet :: 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

您可以設置noHide = F而不是noHide = T在labelOptions

而且你可以嘗試添加options = markerOptions(riseOnHover = TRUE)就要上標記的頂部標籤。

最終代碼將是：

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