powered by
SIL (Xca, U)
sil.obj
PC
PE
MPC
SIL.F
XB
Fclust
data(Mc) for (j in 2:(ncol(Mc)-1)) Mc[,j]=Mc[,j]/Mc[,1] Mc=Mc[,-1] clust=FKM(Mc[,1:(ncol(Mc)-1)],k=6,m=1.5,stand=1) sil=SIL(clust$Xca,clust$U)
Run the code above in your browser using DataLab