Grupy nakładek

Interaktywne mapy z leaflet w R

Rich Majerus

Vice President of Strategy & Planning, Queens University of Charlotte

Grupowanie uczelni według sektora

m <- ca_colleges %>% 
  leaflet() %>% 
  addProviderTiles("CartoDB") 
m %>% 
  addCircleMarkers(
              radius = 2,
              label = ~name)

Warstwy uczelni w Kalifornii 1

ca_public <- ipeds  %>% 
  filter(sector == "Public", 
         state == "CA") 
m %>% 
  addCircleMarkers(
        data = ca_public,
        group = "Public")

Warstwy uczelni w Kalifornii 2

m %>% 
 addCircleMarkers(
   data = ca_public,
   color = ~pal(sector_label),
   group = "Public")  %>% 

addCircleMarkers(
   data = ca_private,
   color = ~pal(sector_label),
   group = "Private")  %>%

addCircleMarkers(
   data = ca_profit,
   color = ~pal(sector_label),
   group = "For-Profit")

Warstwy uczelni w Kalifornii 1

m %>% 
 addCircleMarkers(
   data = ca_public,
   color = ~pal(sector_label),
   group = "Public")  %>% 

addCircleMarkers(
   data = ca_private,
   color = ~pal(sector_label),
   group = "Private")  %>% 

addCircleMarkers(
   data = ca_profit,
   color = ~pal(sector_label),
   group = "For-Profit")  %>% 

addLayersControl(
  overlayGroups = c("Public", 
                    "Private", 
                    "For-Profit"))

Warstwy uczelni w Kalifornii 3

Cel, do którego dążymy

Wszystkie warstwy uczelni

Czas na ćwiczenia!

Interaktywne mapy z leaflet w R