Собираем всё вместе
Попробуем объединить всё в одном шаге. Создание интерактивной карты всех четырёхлетних колледжей Америки можно разбить на четыре этапа:
- Инициализировать веб-карту
- Добавить базовые карты
- Нанести колледжи каждого сектора как отдельный слой
- Добавить элементы управления слоями, чтобы пользователи могли переключать базовые карты и накладываемые группы
Фреймы данных public, private и profit, а также цветовая палитра pal уже загружены.
Это упражнение является частью курса
Интерактивные карты с leaflet в R
Инструкции к упражнению
- Введите названия функций, чтобы создать интерактивную веб-карту с несколькими накладываемыми группами и группами базовых карт.
Интерактивное практическое упражнение
Попробуйте выполнить это упражнение, дополнив этот пример кода.
m4 <- ___() %>%
___(group = "OSM") %>%
___("CartoDB", group = "Carto") %>%
___("Esri", group = "Esri") %>%
___(data = public, radius = 2, label = ~htmlEscape(name),
color = ~pal(sector_label), group = "Public") %>%
___(data = private, radius = 2, label = ~htmlEscape(name),
color = ~pal(sector_label), group = "Private") %>%
___(data = profit, radius = 2, label = ~htmlEscape(name),
color = ~pal(sector_label), group = "For-Profit") %>%
___(baseGroups = c("OSM", "Carto", "Esri"),
overlayGroups = c("Public", "Private", "For-Profit")) %>%
___(lat = 39.8282, lng = -98.5795, zoom = 4)
m4