Bileşenleri al
Önceki egzersizde uyarlanan model fit_with_covariance nesnesinde. Buradaki amaç, her iki küme için ortalamaları ve kovaryans matrislerini çıkarmak.
Bu egzersiz, kursun bir parçasıdır
R ile Karışım Modelleri
Egzersiz talimatları
- Her küme için ortalamaları ve kovaryans matrislerini çıkarmak üzere uygun bileşen numarasıyla
parameters()fonksiyonunu kullan. Sonuçlarıcomp_numbernesnelerine kaydet. comp_numberiçindeki ilk iki değer ortalamaya karşılık gelir. Bunlarımean_comp_numbernesnelerine kaydet.comp_numberiçindeki son dört değer kovaryans matrisine karşılık gelir. Bu değerleri 2x2 matrislere kaydet.
Uygulamalı etkileşimli egzersiz
Bu egzersizi bu örnek kodu tamamlayarak deneyin.
# 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