整理每個線性迴歸模型
你已經對每個巢狀資料集執行線性迴歸，並將線性模型存到清單欄位 model 中。不過在把這些模型重新組合之前，必須先把每個模型「整理」成係數表。為此，你需要再用一次 map()，以及 broom 套件中的 tidy() 函式。
回想一下，你可以直接把函式傳給 map()（例如 map(models, tidy)），就能把該函式套用到清單中的每個項目。
本練習屬於課程
案例研究：R 中的探索性資料分析
練習說明
- 載入
broom套件。 - 使用
map()函式將tidy()套用到model欄中的每個線性模型，並建立名為tidied的新欄位。
動手互動練習
試著完成這個範例程式碼，體驗一下這個練習。
# Load the broom package
# Add another mutate that applies tidy() to each model
by_year_country %>%
nest(-country) %>%
mutate(model = map(data, ~ lm(percent_yes ~ year, data = .)))