可视化NbClust的结果

Question

在对数据执行NbClust后，我发现根据多数规则将5个聚类确定为最佳数。但是，如何找出哪个指数产生了这5个聚类？

我该如何绘制带有省略号的新数据和颜色/组？过去，我使用过fviz_cluster包中的facto，但通常使用kmeans对象。我试图输入nb，但这是一个列表，因此会导致错误。我知道我可以绘制具有最佳聚类数的直方图，但是我没有尝试绘制它。

以虹膜为例的可复制示例

library("NbClust")
data(iris)
iris.scaled <- scale(iris[, -5])
set.seed(123)
res.nb <- NbClust(iris.scaled, distance = "euclidean",
                  min.nc = 2, max.nc = 10, 
                  method = "complete", index ="gap") 
res.nb # print the results
fviz_nbclust(res.nb) + theme_minimal()

Answer 1

自变量index应该为all。但是，可以通过忽略该参数来让程序包本身执行此操作。

res.nb <- NbClust(iris.scaled, distance = "euclidean",
                  min.nc = 2, max.nc = 10, 
                  method = "complete")

res.nb <- NbClust(iris.scaled, distance = "euclidean",
                  min.nc = 2, max.nc = 10, 
                  method = "complete", 
                  index ="all") 

library(factoextra)
fviz_nbclust(res.nb)