R 中的 MclustGMM 模型聚类:如何为聚类中的每个点添加标签?

问题描述

我想基于参数化的有限高斯混合模型执行基于模型的聚类。我在 Mclust 中通过 mclust 包使用了 R 函数我有一个这样的数据框(我在这里报告了前 10 行):

df=data.frame(X1=c(-0.9749422,-0.4062771,1.0974262,-2.297264,-1.6022011,2.144254,2.2012879,2.810878,0.6728063,-0.7042836),X2= c(0.1740782,-1.4475989,0.8575626,1.8466605,-2.0279622,2.9748541,0.8820755,3.0898032,1.3757168,-1.9729475),label=as.character(c("abundant","accelerating","anyone","approach","association","ban","blog","commission","complete","congratulations")),stringsAsFactors = FALSE)

>   df      
    X1          X2          label
1  -0.9749422    0.1740782  abundant
2  -0.4062771   -1.4475989  accelerating
3   1.0974262    0.8575626  anyone
4  -2.297264     1.8466605  approach
5  -1.6022011   -2.0279622  association
6   2.144254     2.9748541  ban
7   2.2012879    0.8820755  blog
8   2.810878     3.0898032  commission
9   0.6728063    1.3757168  complete
1  -0.7042836   -1.9729475  congratulations

我想在X1 X2平面上绘制Mclust函数得到的簇,表示簇中每个点的对应标签,然后我从(3个簇例如)开始:

mod2 <- Mclust(plot_df[,1:2],G = 3)
plot(mod2,"classification")

但显然我没有得到任何标签。如何为集群中的每个点添加标签

谢谢!

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)