Mclustの高速化
R言語でEMアルゴリズムのクラスタリングを実行してくれるパッケージの一つにMclustがあります。
ただ、初期設定で実行すると
fitting ... |=============================================| 100%
こんな感じでプログレスバーがコンソールに表示されます。特に何回もループするとこれがたくさん表示されます。
lapply()とかsapply()でループしても当然ですが表示されます。せっかく高速化目指して"apply系列"で処理してるのに"For文"と遅さが変わらん。
そんな時はオプションでverbose = FALSEとしてあげるとプログレスバーが表示されなくなります。
mclust::densityMclust(data, verbose = FALSE)
こんな感じです。100回ループさせようが、"apply系列"なら瞬殺で終わります。ほんとMclust優秀ですね。
