powered by
XB (Xca, U, H, m)
PC
PE
MPC
SIL
SIL.F
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) xb=XB(clust$Xca,clust$U,clust$H,clust$m)
Run the code above in your browser using DataLab