Melepas sarang (unnest) sebuah data frame
Sekarang Anda memiliki versi yang telah dirapikan dari setiap model yang disimpan dalam kolom tidied. Anda ingin menggabungkan semuanya menjadi satu data frame besar, mirip dengan cara Anda menggabungkan model yang telah dirapikan untuk AS dan Inggris sebelumnya. Ingat bahwa fungsi unnest() dari tidyr dapat melakukan hal ini.
Latihan ini adalah bagian dari kursus
Studi Kasus: Exploratory Data Analysis di R
Petunjuk latihan
- Tambahkan langkah
unnest()untuk melepas sarang model yang telah dirapikan yang disimpan di kolomtidied. Simpan hasilnya sebagaicountry_coefficients. - Cetak objek
country_coefficientsyang dihasilkan ke konsol.
Latihan interaktif praktis
Cobalah latihan ini dengan menyelesaikan kode contoh berikut.
# Add one more step that unnests the tidied column
___ <- by_year_country %>%
nest(-country) %>%
mutate(model = map(data, ~ lm(percent_yes ~ year, data = .)),
tidied = map(model, tidy))
# Print the resulting country_coefficients variable