İki adımı uygula
expectation ve maximization fonksiyonlarını oluşturduğuna göre, artık EM algoritmasını bir veri çerçevesine uygulayabilirsin.
Bu egzersizdeki amaç, gaussian_sample verisinde iki Gauss kümesi bulmak. Her iki sd değerinin de 10'a eşit olduğunu varsay.
Bu egzersiz, kursun bir parçasıdır
R ile Karışım Modelleri
Egzersiz talimatları
- Başlangıç tahmini olarak kümelerden birinin ortalamasının
0, diğerinin100olduğunu varsay.expectationvemaximizationfonksiyonlarını kullanaraknew_valuesadlı bir liste oluştur. - Bu değerleri
means_initvektörüne kaydet. Oranların eşit olduğunu varsay ve bunuprops_initvektöründe göster. - 10 yineleme boyunca devam et.
Uygulamalı etkileşimli egzersiz
Bu egzersizi bu örnek kodu tamamlayarak deneyin.
means_init <- c(0, 100)
___ <- c(0.5, 0.5)
# Iterative process
for(i in 1:___){
___ <- maximization(___(gaussian_sample, means_init, props_init, c(10, 10)))
means_init <- new_values[[1]]
props_init <- ___[[2]]
cat(c(i, means_init, props_init), "\n")
}