При нанесении маркеров на интерактивную карту мира из листовки пакета r данные с одинаковыми координатами будут перекрывать друг друга.

Смотрите пример ниже:

library(leaflet)

Data <- structure(list(Name = structure(1:3, .Label = c("M1", "M2", "M3"), class = "factor"), Latitude = c(52L, 52L, 51L), Longitude = c(50L, 50L, 50L), Altitude = c(97L, 97L, 108L)), .Names = c("Name", "Latitude", "Longitude", "Altitude"), class = "data.frame", row.names = c(NA, -3L))

leaflet(data = Data) %>% 
              addProviderTiles("Esri.WorldImagery", options = providerTileOptions(noWrap = TRUE)) %>%
              addMarkers(~Longitude, ~Latitude, popup = ~as.character(paste(sep = "",
                                                                          "<b>",Name,"</b>","<br/>", "Altitude: ",Altitude)))

Есть возможность показать все координаты с помощью опции кластера, но это далеко от моей цели. Я не хочу кластеров, и при полном увеличении отображаются только перекрывающиеся маркеры. При полном увеличении фоновая карта становится серой («Данные карты еще не доступны»). Паук вид перекрывающихся маркеров это то, что я хочу, но не когда полностью увеличено.

Смотрите пример ниже:

leaflet(data = Data) %>% 
  addProviderTiles("Esri.WorldImagery", options = providerTileOptions(noWrap = TRUE)) %>%
  addMarkers(~Longitude, ~Latitude, popup = ~as.character(paste(sep = "",
                                                                "<b>",Name,"</b>","<br/>", "Altitude: ",Altitude)), clusterOptions = markerClusterOptions())

Я нашел немного литературы о решении, которое я хочу, но я не знаю, как реализовать его в коде / пакете буклета r.https://github.com/jawj/OverlappingMarkerSpiderfier-Leaflet

Также, если есть другие подходы для обработки перекрывающихся маркеров, не стесняйтесь отвечать. (например, информация о нескольких маркерах в одном всплывающем окне)