開始使用免費開始

繪製公立大學地圖

我們可以把每個「學校屬性（sector）」加到地圖中作為圖層，讓使用者自行選擇要顯示哪些屬性。要做到這點，會在 addCircleMarkers() 函式中使用一個新的引數 group。

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

我們也會把 htmltools 函式庫中的另一個功能整合進地圖。把標籤包在 htmlEscape() 函式中，可以清理可能被解讀為 HTML 的字元，避免校名出現非預期的格式。

你在第 2 章建立的色票 pal 已為你載入。

本練習屬於課程

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

檢視課程

練習說明

  • 載入 htmltools 套件。
  • 篩選 ipeds 資料，只保留公立大學，建立資料框。
  • 建立公立大學的 leaflet 地圖。
  • 在 addCircleMarkers() 中加入 group 引數。

動手互動練習

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

# 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
編輯並執行程式碼