การ Unnest data frame

ตอนนี้มีโมเดลที่จัดระเบียบแล้วของแต่ละโมเดลเก็บไว้ในคอลัมน์ tidied จากนั้นต้องนำโมเดลทั้งหมดมารวมกันเป็น data frame ขนาดใหญ่ คล้ายกับที่เคยรวมโมเดลที่จัดระเบียบแล้วของ US และ UK ไว้ก่อนหน้านี้ โดยใช้ฟังก์ชัน unnest() จากแพ็กเกจ tidyr

แบบฝึกหัดนี้เป็นส่วนหนึ่งของหลักสูตร

กรณีศึกษา: การวิเคราะห์เชิงสำรวจข้อมูลใน R

ดูคอร์ส

คำแนะนำการฝึกหัด

เพิ่มขั้นตอน unnest() เพื่อ unnest โมเดลที่จัดระเบียบแล้วซึ่งเก็บอยู่ในคอลัมน์ tidied แล้วบันทึกผลลัพธ์เป็น country_coefficients
แสดงออบเจกต์ country_coefficients ที่ได้ออกทาง console

แบบฝึกหัดเชิงโต้ตอบแบบลงมือทำ

ลองทำแบบฝึกหัดนี้โดยเติมโค้ดตัวอย่างนี้ให้สมบูรณ์

# 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

แก้ไขและรันโค้ด