两步聚类,是提高数据聚类效率的方法。
其本质还是利用传统聚类。
预聚类你可以自己写:原理很简单,网上说的很复杂因为,他们需要考虑算法优化。
你可以自己建个简单循环进行预聚类,之后调用传统聚类(传统聚类自己在网上搜吧)。
提示到此。
网上一些说法也不一定靠谱,买相关书籍学习比较好。
预聚类
for(i in 2:nrow(x)){
flag<-0
for(j in 1:length(class)){
#此处预聚类用的是相关系数,0.8是阀值
if(cor(class[j,],x[i,])>0.8){
class[[j]]<-c(class[[j]],i)
flag<-1
break
}
}
if(flag==1){
class[[length(class)+1]]<-i
}
}