如何使用 fviz_nbclust 打印最佳簇数

Question

我需要帮助来了解如何使用 R 中的 k-means 聚类找到最佳的聚类数。

我的代码是

library(cluster)
library(factoextra)


#read data
data<-read.csv("..\file.txt",header=FALSE, sep=" ")

#determine number of clusters to use
k.max<- 22
wss <- sapply(2:k.max, function(k){kmeans(data, k, nstart=10 )$tot.withinss})

print(wss)

plot(2:k.max, wss, type="b", pch = 19,  xlab="Number of clusters K", ylab="Total within-clusters sum of squares")


fviz_nbclust(data, kmeans, method = "wss") + geom_vline(xintercept = 3, linetype = 2)

我得到了剧情，但我还是不知道如何找到数字？

谢谢

My plot is in this link to show the rlation between wss and number of clusters with no information about the optimal number of clusters

Answer 1

n_clust<-fviz_nbclust(df, kmeans, method = "silhouette",k.max = 30)
n_clust<-n_clust$data
max_cluster<-as.numeric(n_clust$clusters[which.max(n_clust$y)])

Answer 2

“肘部”没有可靠的数学定义（因为 x 和 y 上有不同的比例，所以没有角度），在像你这样的图中可能根本没有“肘部”。

很可能，k-means 不适用于任何 k。这种情况经常发生。例如，如果您的数据不包含集群。

尝试生成统一的数据，并绘制相同的图 - 它看起来很相似。