기본 그룹

R로 만드는 leaflet 인터랙티브 지도

Rich Majerus

Vice President of Strategy & Planning, Queens University of Charlotte

기본 그룹과 다중 맵 타일

leaflet() %>% 
  addTiles(group = "OSM") %>% 
  addProviderTiles("CartoDB", group = "Carto") %>% 
  addProviderTiles("Esri", group = "Esri")

기본 그룹 1

leaflet() %>% 
  addTiles(group = "OSM") %>% 
  addProviderTiles("CartoDB", group = "Carto") %>% 
  addProviderTiles("Esri", group = "Esri")  %>% 

  addLayersControl(baseGroups = c("OSM", "Carto", "Esri"),
                   position = "topleft")

기본 그룹 2

Esri 기본 맵 탐색

기본 그룹 3

오버레이 그룹과 기본 그룹

# initialize leaflet map
leaflet() %>%

# add basemaps with groups
  addTiles(group = "OSM") %>% 
  addProviderTiles("CartoDB", group = "Carto") %>% 
  addProviderTiles("Esri", group = "Esri") %>%

오버레이 그룹과 기본 그룹

# add marker layer for each sector with corresponding group name
addCircleMarkers(data = public, radius = 2, 
                 label = ~htmlEscape(name),
                 color = ~pal(sector_label), group = "Public") %>% 
addCircleMarkers(data = private, radius = 2, 
                 label = ~htmlEscape(name),
                 color = ~pal(sector_label), group = "Private") %>% 
addCircleMarkers(data = profit, radius = 2, 
                 label = ~htmlEscape(name),
                 color = ~pal(sector_label), group = "For-Profit") %>% 

# add layer controls for base and overlay groups
addLayersControl(baseGroups = c("OSM", "Carto", "Esri"), 
                 overlayGroups = c("Public", "Private", 
                                     "For-Profit"))

최종 결과

기본 그룹과 오버레이 그룹이 적용된 4년제 대학 전체

연습해 봅시다!

R로 만드는 leaflet 인터랙티브 지도