ПочатиПочніть безкоштовно

Картографування всіх коледжів

Продовжмо додавати шари й додайте комерційні коледжі до нашої мапи leaflet, що зберігається в об'єкті m3.

Після того як ви print() мапу m3 з державними, приватними та комерційними коледжами як окремими шарами, спробуйте прибрати всі три шари й додати їх назад у іншому порядку.

Різні сектори коледжів додаються на мапу як шари в тому порядку, який ви задасте (тобто останній вибраний сектор буде зверху).

Кольорова палітра pal і мапа m3 з державними та приватними коледжами вже завантажені для вас.

Ця вправа є частиною курсу

Інтерактивні карти з leaflet у R

Переглянути курс

Інструкції до вправи

  • Відфільтруйте дані ipeds, щоб створити датафрейм лише з комерційними коледжами, і присвойте його до profit.
  • Створіть мапу leaflet з державними, приватними та комерційними коледжами.
  • Використайте функцію addLayersControl() та аргумент overlayGroups, щоб дозволити користувачам перемикати всі три сектори коледжів.
  • Центруйте мапу на середині США та встановіть масштаб 4.

Інтерактивна практична вправа

Спробуйте виконати цю вправу, доповнивши цей зразок коду.

# Create data frame called profit with only For-Profit colleges
___ <- filter(ipeds, sector_label == "For-Profit")  

# Add For-Profit colleges to `m3` as a new layer
m3 <- m3 %>% 
        addCircleMarkers(data = ___, radius = 2, label = ~htmlEscape(name),
                         color = ~pal(sector_label),   group = "___")  %>% 
        addLayersControl(overlayGroups = c("Public", "Private", "___"))  

# Center the map on the middle of the US with a zoom of 4
m4 <- m3 %>%
        ___(lat = 39.8282, lng = -98.5795, zoom = 4) 
        
m4
Редагувати та запускати код