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

Добавление всплывающих окон и сохранение карты

Чтобы сделать карту более информативной, можно добавить всплывающие окна. Для отображения всплывающего окна при нажатии на маркер необходимо указать аргумент popup в функции addMarkers(). Готовую карту можно сохранить в объект, а затем передавать этот объект в функции через пайп, чтобы добавлять или редактировать слои карты.

dc_nyc <- 
    leaflet() %>% 
        addTiles() %>% 
        addMarkers(lng = -73.98575, lat = 40.74856, 
                   popup = "DataCamp - NYC") 

dc_nyc %>% 
    setView(lng = -73.98575, lat = 40.74856, 
            zoom = 2)

Давайте попробуем добавить всплывающие окна к обоим маркерам местоположений DataCamp и сохранить карту в объект.

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

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

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

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

  • Добавьте аргумент popup в функцию addMarkers(), чтобы отображать значение из столбца hq, и сохраните карту leaflet в объект с именем map.
  • Установите центр отображения map на штаб-квартиру в Бельгии с уровнем масштабирования 5 и сохраните результат в map_zoom.
  • Выведите объект map_zoom.

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

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

# Store leaflet hq map in an object called map
 ___ <- leaflet() %>%
          addProviderTiles("CartoDB") %>%
          # Use dc_hq to add the hq column as popups
          addMarkers(lng = dc_hq$lon, lat = dc_hq$lat,
                     popup = ___$___)

# Center the view of map on the Belgium HQ with a zoom of 5 
map_zoom <- ___ %>%
      setView(lat = 50.881363, lng = 4.717863,
              zoom = ___)

# Print map_zoom
___
Редактировать и запускать код