Я пытаюсь создать простую карту Виктории, чтобы отображать название при нажатии на пригород.
Поскольку мой шейп-файл содержит более детализированные данные, которые отображают информацию об уровне улицы, я хочу объединить гранулированные данные на основе столбца пригорода в моем шейп-файле, чтобы при щелчке по пригороду он выделял пригород, составленный из меньшего размера уличные фигуры.
Мой шейп-файл выглядит так
MOVEMENT_I, DISPLAY_NA, id
1, 0 Giddings Street, North Geelong, 0
6, Lennoxs Lane, Fiskville, 5
Я уже создал столбец пригорода в моем наборе данных шейп-файла, который был получен из отображаемого имени. Я вижу, что название пригорода точно появляется во всплывающих ярлыках для каждой меньшей фигуры в пригороде.
locations <- leaflet(destinationsOnly) %>%
addTiles() %>%
addMarkers(lng=144.9671 , lat=-37.8183, popup="Flinders Street Railway Station")%>%
addPolygons(data = PG,color = "#444444", weight = 1, smoothFactor = 0.5,
opacity = 1.0, fillOpacity = 0.2,popup = PG$suburb,
highlightOptions = highlightOptions(color = "white", weight = 2,
bringToFront = TRUE))
locations
Я надеюсь, что есть способ только выделить границы пригорода на всякий случай. Любая помощь приветствуется. Спасибо.