Листовка R Кластерные маркеры - PullRequest
Новая
       5

Листовка R Кластерные маркеры

0 голосов
/ 25 мая 2018

Не знаю, как задать этот вопрос, но я просто скажу, что я хочу сделать, и посмотрю, имеет ли это смысл.

У меня 98 медицинских центров, которые я хочу отобразить на карте.Я хочу, чтобы кто-то сообщил, какие пациенты (их геокодированный домашний адрес) посещали какое конкретное место.

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

Или это возможно ...

После картирования 98 центров здоровья пользователь сможет щелкнуть маркер конкретного центра здоровья, который выдает группы пациентов, которые посетили это место?

library(leaflet) 

lon<- c(-79.7040814, -79.7181073, -79.7205967, -79.6950229, 
        -79.7025451, -79.7101802, -79.697314,  -79.4193994, 
        -79.3616147, -79.4222632, -79.3799488, -79.436703,  
        -79.2605482)
lat<-c(44.3717399, 44.38451, 44.4009188,44.3953905,
       44.3395549,44.4074851,44.342504,43.6850894,
       43.6790897,43.7099293,43.6692283,43.6724314,
       43.8007403)

Clinic<-  c("green", "green", "green","green","green","green","green",
            "red", "red","red","red","red", "red")

test_df<- data.frame(lon,lat,Clinic)

icon_ClinicA <- makeAwesomeIcon(icon= 'hospital-o', markerColor = 'green', 
                                iconColor = 'white', library = "fa")
icon_ClinicB<- makeAwesomeIcon(icon = 'hospital-o', markerColor = 'red', 
                               iconColor = 'white', library = "fa")

leaflet(data=test_df) %>% addTiles() %>%
  addMarkers(lng = ~lon, lat = ~lat, 
              addMarkers(clusterOptions = markerClusterOptions(lng=~lon, 
                        lat=~lat)) %>% 
  addCircleMarkers(color = ~Clinic, radius=2) %>% 
  addAwesomeMarkers(lng=-79.659507, lat=44.413486,
    label='Clinic A', icon = icon_ClinicA) %>% 
  addAwesomeMarkers(lng=-79.3939022, lat=43.6588712,
    label='Clinic B',icon = icon_ClinicB)

Итак, резюмируем: передо мной стоит проблема, заключающаяся в том, что я пытаюсь указать, какие отдельные предметы поступают из конкретной клиники.В этом примере это легко увидеть, но, тем не менее, когда я нарисую остальные 96 клиник, некоторые клиники будут располагаться рядом друг с другом.Кроме того, я попытался раскрасить 98 клиник (в данном случае красный против зеленого), но сейчас думаю, что это может быть не самый безопасный маршрут, так как нет 98 разных цветов.Можно ли иметь оттенки цвета (например, как в ggplot2)?Таким образом, если это возможно, может ли маркер Клиники А быть одного оттенка красного, а Клиника В - более темного оттенка красного (при этом соответствующие субъекты согласовывали цвета с соответствующими клиниками)?

...