Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/hibernate/5.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 为什么wss图的线条(用于优化聚类分析)看起来如此波动?_R_Plot_Cluster Analysis_Hierarchical Clustering - Fatal编程技术网

R 为什么wss图的线条(用于优化聚类分析)看起来如此波动?

R 为什么wss图的线条(用于优化聚类分析)看起来如此波动?,r,plot,cluster-analysis,hierarchical-clustering,R,Plot,Cluster Analysis,Hierarchical Clustering,我有一个R的聚类图,而我想用wss图优化聚类的“肘部标准”,所以我为我的集群绘制了一个wss图,但它看起来真的很奇怪,我不知道我应该聚类多少肘部,有人能帮我吗 这是我的数据: Friendly<-c(0.533,0.854,0.9585,0.925,0.9125,0.9815,0.9645,0.981,0.9935,0.9585,0.996,0.956,0.9415) Polite<-c(0,0.45,0.977,0.9915,0.929,0.981,0.9895,0.9875,1,

我有一个R的聚类图,而我想用wss图优化聚类的“肘部标准”,所以我为我的集群绘制了一个wss图,但它看起来真的很奇怪,我不知道我应该聚类多少肘部,有人能帮我吗

这是我的数据:

Friendly<-c(0.533,0.854,0.9585,0.925,0.9125,0.9815,0.9645,0.981,0.9935,0.9585,0.996,0.956,0.9415)
Polite<-c(0,0.45,0.977,0.9915,0.929,0.981,0.9895,0.9875,1,0.96,0.996,0.873,0.9125)
Praising<-c(0,0,0.437,0.9585,0.9415,0.9605,0.998,0.998,0.8915,1,1,1,0.977)
Joking<-c(0,0,0,0.617,0.942,0.9665,0.9935,0.992,0.935,0.987,0.975,0.9915,0.9665)
Sincere<-c(0,0,0,0,0.617,0.8335,0.985,0.9895,0.977,0.9205,1,0.9585,0.8895)
Serious<-c(0,0,0,0,1,0.642,0.975,0.9605,0.9645,0.9895,0.8125,0.9605,0.925)
Hostile<-c(0,0,0,0,0,0,0.629,0.656,0.948,0.9705,0.9645,0.998,0.9685)
Rude<-c(0,0,0,0,0,0,0,0.687,0.979,0.954,0.954,0.996,0.956)
Irony<-c(0,0,0,0,0,0,0,0,0.354,0.9815,0.996,1,0.971)
Insincere<-c(0,0,0,0,0,0,0,0,1,0.396,0.996,0.9915,0.9415)
Commanding<-c(0,0,0,0,0,0,0,0,0,1,0.462,0.9605,0.9165)
Suggesting<-c(0,0,0,0,0,0,0,0,0,0,0,0.867,0.775)
Neutral<-c(0,0,0,0,0,0,0,0,0,0,0,0,0.283)

data <- data.frame(Friendly,Polite,Praising,Joking,Sincere,Serious,Hostile,Rude,Blaming,Insincere,Commanding,Suggesting,Neutral)

Friendly为什么您认为WSS会随着集群数量的增加而平稳下降?正如你发现的那样,它不需要。只有使用性能良好的数据,我才能看到性能良好的屏幕图


WSS中有7个集群,这可能意味着你想停在那里。但是,在评估时,您还应该查看树状图。

好的,我知道了。然而,我看到有人把他的wss图的y轴标记为“惯性之间”,我认为他们有类似的意思,对吗?但惯性之间的确切含义是什么?非常感谢。
##cluster analysis
dist<-as.dist(data)
hc<-hclust(dist, method="average")
plot(hc, main="", sub='Method="Average"', ann=T, axes=T, hang=0.2)
##draw a wss plot
res <- sapply(seq.int(1, 13), wrap, h = hc, x = data) 
plot(seq_along(res), res, type="b", pch=19)