Maak elk lineair regressiemodel tidy
Je hebt nu voor elke geneste gegevensset een lineaire regressie uitgevoerd en een lineair model opgeslagen in de lijstkolom model. Maar je kunt de modellen pas weer combineren als je elk model hebt opgeruimd tot een tabel met coëfficiënten. Daarvoor gebruik je nog één keer map() en de functie tidy() uit het broom-pakket.
Onthoud dat je simpelweg een functie aan map() kunt doorgeven (bijv. map(models, tidy)) om die functie op elk item van een lijst toe te passen.
Deze oefening maakt deel uit van de cursus
Casestudy: Exploratory Data Analysis in R
Oefeninstructies
- Laad het
broom-pakket. - Gebruik de functie
map()om de functietidy()toe te passen op elk lineair model in de kolommodel, en maak een nieuwe kolomtidiedaan.
Praktische interactieve oefening
Probeer deze oefening eens door deze voorbeeldcode in te vullen.
# 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 = .)))