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 merupakan bagian dari kursus

Studi Kasus: Exploratory Data Analysis di R

Lihat Kursus

Instruksi 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 langsung praktik

Cobalah latihan ini dengan melengkapi kode contoh ini.

# 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