НачатьНачать бесплатно

Отображение государственных колледжей на карте

Каждый сектор можно добавить на карту в виде отдельного слоя, чтобы пользователи могли выбирать, какие секторы отображать. Для этого используется новый аргумент функции addCircleMarkers() — group.

leaflet() %>% 
        addProviderTiles("CartoDB") %>% 
        addCircleMarkers(data = public, 
                         label = ~htmlEscape(name), 
                         group = "Public")

Мы также подключим ещё одну возможность из библиотеки htmltools. Оборачивая метки функцией htmlEscape(), вы защищаете от некорректной интерпретации символы, которые браузер может воспринять как HTML. Это предотвратит непреднамеренное форматирование названий колледжей.

Цветовая палитра pal, созданная в главе 2, уже загружена.

Это упражнение является частью курса

Интерактивные карты с leaflet в R

Посмотреть курс

Инструкции к упражнению

  • Загрузите пакет htmltools.
  • Отфильтруйте данные ipeds, чтобы получить таблицу только с государственными колледжами.
  • Создайте карту leaflet для государственных колледжей.
  • Добавьте аргумент group в функцию addCircleMarkers().

Интерактивное практическое упражнение

Попробуйте выполнить это упражнение, дополнив этот пример кода.

# Load the htmltools package
___

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

# Create a leaflet map of public colleges called m3 
m3 <- leaflet() %>% 
        addProviderTiles("CartoDB") %>% 
        addCircleMarkers(data = ___, radius = 2, label = ~htmlEscape(name),
                         color = ~pal(sector_label), ___ = "Public")

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