Rapikan setiap model regresi linear

Sekarang Anda telah melakukan regresi linear pada setiap himpunan data yang dinest dan menyimpan model linear dalam kolom daftar model. Namun, Anda belum dapat menggabungkan kembali model-model tersebut sampai Anda merapikan masing-masingnya menjadi sebuah tabel koefisien. Untuk itu, Anda perlu menggunakan map() sekali lagi dan fungsi tidy() dari paket broom.

Ingat bahwa Anda dapat langsung memberikan sebuah fungsi ke map() (misalnya map(models, tidy)) untuk menerapkan fungsi tersebut pada setiap item dalam sebuah daftar.

Latihan ini adalah bagian dari kursus

Studi Kasus: Exploratory Data Analysis di R

Lihat Kursus

Petunjuk latihan

Muat paket broom.
Gunakan fungsi map() untuk menerapkan fungsi tidy() pada setiap model linear dalam kolom model, lalu buat kolom baru bernama tidied.

Latihan interaktif praktis

Cobalah latihan ini dengan menyelesaikan kode contoh berikut.

# 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 = .)))

Edit dan Jalankan Kode