Traccia i cluster stimati
A questo punto hai individuato i due cluster nel data frame gaussian_sample. In questo esercizio visualizzerai come i cluster stimati all'iterazione 10 si adattano ai dati. I vettori means_iter10 e props_iter10 sono già salvati nell'ambiente.
Per farlo, userai la funzione di ggplot2 chiamata stat_function(), che ti permette di sovrapporre una funzione a un grafico esistente. La funzione che userai è una funzione di curva chiamata fun_gaussian() che prende come argomenti la media e la proporzione della Gaussiana.
Questo esercizio fa parte del corso
Modelli di Mixture in R
Istruzioni dell'esercizio
Traccia l'istogramma in modalità densità della variabile x e aggiungi le curve stimate usando stat_function() in combinazione con la funzione fun_gaussian().
Esercizio pratico interattivo
Prova a risolvere questo esercizio completando il codice di esempio.
___ %>%
ggplot() + geom_histogram(aes(x = ___, y = ___), bins = 200) +
stat_function(geom = "line", fun = fun_gaussian,
args = list(mean = means_iter10[1], proportion = ___[1])) +
stat_function(geom = "line", fun = fun_gaussian,
args = list(mean = ___[2], proportion = props_iter10[2]))