ดึงค่าองค์ประกอบ
โมเดลที่ฝึกแล้วจากแบบฝึกหัดก่อนหน้าอยู่ในออบเจกต์ fit_with_covariance เป้าหมายในที่นี้คือการดึงค่าเฉลี่ยและเมทริกซ์ความแปรปรวนร่วมสำหรับทั้งสองคลัสเตอร์
แบบฝึกหัดนี้เป็นส่วนหนึ่งของหลักสูตร
Mixture Models ใน R
คำแนะนำการฝึกหัด
- ใช้ฟังก์ชัน
parameters()พร้อมระบุหมายเลของค์ประกอบที่ต้องการ เพื่อดึงค่าเฉลี่ยและเมทริกซ์ความแปรปรวนร่วมของแต่ละคลัสเตอร์ บันทึกผลลัพธ์ลงในออบเจกต์comp_number - สองค่าแรกของ
comp_numberคือค่าเฉลี่ย ให้บันทึกลงในออบเจกต์mean_comp_number - สี่ค่าสุดท้ายของ
comp_numberคือเมทริกซ์ความแปรปรวนร่วม ให้บันทึกค่าเหล่านี้เป็นเมทริกซ์ขนาด 2x2
แบบฝึกหัดเชิงโต้ตอบแบบลงมือทำ
ลองทำแบบฝึกหัดนี้โดยเติมโค้ดตัวอย่างนี้ให้สมบูรณ์
# Get the parameters
comp_1 <- ___(___, component = 1)
comp_2 <- parameters(fit_with_covariance, component = ___)
# The means
mean_comp_1 <- ___[1:2]
mean_comp_1
mean_comp_2 <- comp_2[___]
mean_comp_2
# The covariance matrices
covariance_comp_1 <- matrix(comp_1[___], nrow = 2)
covariance_comp_1
covariance_comp_2 <- matrix(comp_2[___], nrow = ___)
covariance_comp_2