การประเมินและเปรียบเทียบการ imputation
เมื่อสร้างโมเดล imputation ขึ้นมาแล้ว ควรเปรียบเทียบกับวิธีอื่นด้วย ในบทเรียนนี้ เราจะเปรียบเทียบชุดข้อมูลที่ impute ด้วย impute_lm() กับชุดข้อมูลที่ impute ด้วยค่าเฉลี่ย โดยชุดข้อมูลทั้งสองนี้อยู่ในแบบฝึกหัดแล้วในชื่อ ocean_imp_lm_wind และ ocean_imp_mean ตามลำดับ
แบบฝึกหัดนี้เป็นส่วนหนึ่งของหลักสูตร
การจัดการข้อมูลที่หายไปใน R
คำแนะนำการฝึกหัด
- รวมโมเดลเข้าด้วยกันโดยใช้
bind_rows()โดยกำหนดให้ocean_imp_meanอยู่ในmeanและocean_imp_lm_windอยู่ในlm_wind - ดูค่าของ
air_tempและhumidityในรูปแบบ scatter plot โดยวางair_temp_cบนแกน x,humidityบนแกน y, กำหนดสีตามค่าที่หายไป และแบ่ง facet ตามโมเดล imputation ที่ใช้ (imp_model)
แบบฝึกหัดเชิงโต้ตอบแบบลงมือทำ
ลองทำแบบฝึกหัดนี้โดยเติมโค้ดตัวอย่างนี้ให้สมบูรณ์
# Bind the models together
bound_models <- bind_rows(mean = ___,
lm_wind = ___,
.id = "imp_model")
# Inspect the values of air_temp and humidity as a scatter plot
ggplot(___,
aes(x = ___,
y = ___,
color = any_missing)) +
geom_point() +
facet_wrap(~___)