推定されたクラスタをプロットする

ここまでで、データフレーム gaussian_sample に含まれる2つのクラスタを見つけました。この演習では、10回目の反復で推定したクラスタがデータにどのように当てはまるかを可視化します。ベクトル means_iter10 と props_iter10 はすでに環境に保存されています。

そのために、既存のプロット上に関数を重ね描きできる ggplot2 の stat_function() を使います。ここでは、平均とガウシアンの比率を引数に取るカーブ関数 fun_gaussian() を用います。

変数 x のヒストグラムを密度モードで描き、fun_gaussian() と組み合わせた stat_function() を使って推定したカーブを追加してください。