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

Відображення державних і приватних коледжів

Ми можемо додати приватні коледжі так само, як додавали державні. Далі, використавши функцію addLayersControl() з аргументом overlayGroups, ми дамо користувачам змогу вмикати показ державних та/або приватних коледжів. Аргумент overlayGroups приймає вектор груп, які ми визначили під час створення шарів (тобто державні та приватні). Для нагадування, ось як можна додати державні коледжі на мапу як шар:

# Створіть датафрейм public, що містить лише державні коледжі
public <- filter(ipeds, sector_label == "Public")  

# Додайте державні коледжі як шар і збережіть мапу як `m3`
m3 <- leaflet() %>% 
        addProviderTiles("CartoDB") %>% 
        addCircleMarkers(data = public, radius = 2, 
                         label = ~htmlEscape(name),
                         color = ~pal(sector_label),
                         group = "Public") %>% 
        addLayersControl(overlayGroups = c("Public"))

Бібліотеку htmltools, палітру кольорів pal і мапу m3 з державними коледжами вже завантажено для вас.

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

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

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

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

  • Відфільтруйте дані ipeds, щоб створити датафрейм лише з приватними коледжами.
  • Додайте приватні коледжі до m3 як новий шар.
  • Використайте функцію addLayersControl() та аргумент overlayGroups, щоб дозволити користувачам перемикати шари державних і приватних коледжів.

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

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

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

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

m3
Редагувати та запускати код