Vnořování podle tématu a země
V předchozí kapitole jsi sestrojil/a lineární model pro každou zemi tak, že jsi data vnořil/a podle země, na každou podmnožinu dat přizpůsobil/a model a výsledky s pomocí broom přehledně upravil/a a rozvinul/a. Kód vypadal přibližně takto:
country_coefficients <- by_year_country %>%
nest(-country) %>%
mutate(model = map(data, ~ lm(percent_yes ~ year, data = .)),
tidied = map(model, tidy)) %>%
unnest(tidied)
Tentokrát budeš opět modelovat změnu "procenta" hlasů yes v čase, ale místo jednoho modelu pro každou zemi vytvoříš model pro každou kombinaci země a tématu.
Toto cvičení je součástí kurzu
Případová studie: Explorační analýza dat v R
Pokyny k cvičení
- Načti balíčky
purrr,tidyrabroom. - Vypiš dataset
by_country_year_topicdo konzole. - Přizpůsob lineární model pro každou kombinaci země a tématu v tomto datasetu a výsledek ulož jako
country_topic_coefficients. Jako výchozí bod můžeš použít přiložený kód. - Vypiš dataset
country_topic_coefficientsdo konzole.
Interaktivní cvičení na vyzkoušení si v praxi
Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.
# Load purrr, tidyr, and broom
# Print by_country_year_topic
# Fit model on the by_country_year_topic dataset
# Print country_topic_coefficients