添加弹出框并保存地图
为了让地图更具信息性，我们可以添加弹出框。若要在点击标记时显示弹出框，需要在 addMarkers() 函数中指定 popup 参数。当我们得到一张希望保留的地图时，可以将其存储到一个对象中。之后再把该对象用管道传入函数，以添加或编辑地图图层。
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 位置的标记都添加弹出框，并将地图存入一个对象中。
本练习是课程的一部分
在 R 中使用 leaflet 构建交互式地图
练习说明
- 给
addMarkers()添加popup参数，显示 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
___