fclustIndex(y, x, index = "all")
"fclust"
"gath.geva"
, "xie.beni"
,
"fukuyama.sugeno"
, "partition.coefficient"
,
"partition.entropy"
, "proportion.exponent"
,
"separation.index"
and "all"
for all the indexes.
cmeans
# a 2-dimensional example
x<-rbind(matrix(rnorm(100,sd=0.3),ncol=2),
matrix(rnorm(100,mean=1,sd=0.3),ncol=2))
cl<-cmeans(x,2,20,verbose=TRUE,method="cmeans")
resultindexes <- fclustIndex(cl,x, index="all")
resultindexes
Run the code above in your browser using DataLab