視覺化經調整的人口趨勢
讓我們比較不同人口特徵在各年份的借貸變化。你在上一個練習建立的資料框 rydf 已經在你的工作空間中。
注意：我們已移除對應到 "Not Avail" 的那一列。
本練習屬於課程
R 的可擴展資料處理
練習說明
tidyr 和 ggplot2 已載入到你的工作空間。
- 印出
rydf與pop_proportion物件。 - 將
rydf轉為長格式的資料框，彙整除Race之外的所有欄位。 - 建立折線圖，將
Year與Adjusted_Count分別放在 x 與 y 軸。
動手互動練習
試著完成這個範例程式碼，體驗一下這個練習。
# View rydf
___
# View pop_proportion
___
# Gather on all variables except Race
rydfl <- ___(rydf, ___, names_to = "Year", values_to = "Count")
# Create a new adjusted count variable
rydfl$Adjusted_Count <- rydfl$Count / pop_proportion[rydfl$Race]
# Plot
ggplot(rydfl, aes(x = ___, y = ___, group = Race, color = Race)) +
geom_line()