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 merupakan bagian dari kursus
Studi Kasus: Exploratory Data Analysis di R
Instruksi 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 langsung praktik
Cobalah latihan ini dengan melengkapi kode contoh ini.
# 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