開始使用免費開始

addPolygon() 的選項

到目前為止,我們都使用 addPolygons() 的預設外觀。多邊形其實還有更多客製化方式。

本題將聚焦於 addPolygons() 的以下參數:

  • weight:邊界線的粗細(像素)
  • color:多邊形的顏色
  • label:游標懸停時顯示的資訊
  • highlightOptions:游標懸停時突顯多邊形的選項
addPolygons(weight = 2,
           color = "red",
           label = ~paste0("Total Income: ", dollar(income)),
           highlight = highlightOptions(weight = 10,
                                       color = "blue",
                                       bringToFront = TRUE))

前一個練習中你建立的 high_inc SpatialPolygonsDataFrame 已為你載入。

本練習屬於課程

在 R 中使用 leaflet 製作互動式地圖

檢視課程

練習說明

  • 使用 addPolygons() 的參數,將北卡羅來納州中高所得的郵遞區號繪製在地圖上,設定:
    • 邊界粗細為 1 像素,
    • 多邊形使用 nc_pal 調色盤上色,並在游標懸停時會被突顯,以及
    • 標籤顯示「Mean Income:」字樣,後面接著該郵遞區號的平均所得。

動手互動練習

試著完成這個範例程式碼,體驗一下這個練習。

# create color palette with colorNumeric()
nc_pal <- colorNumeric("YlGn", domain = high_inc@data$mean_income)

high_inc %>%
  leaflet() %>%
  addTiles() %>%
  # set boundary thickness to 1 and color polygons
  addPolygons(___ = ___, ___ = ~nc_pal(mean_income),
              # add labels that display mean income
              label = ___("Mean Income: ", dollar(mean_income)),
              # highlight polygons on hover
              ___ = highlightOptions(weight = 5, color = "white",
              bringToFront = TRUE))
編輯並執行程式碼