powered by
cluster.index(clusters, index.type = FALSE, num = NULL, Rindex = 0, mat = NULL, return.all = FALSE, code.na = NA)
i<-c(1,1,2,2,1,3) d<- cluster.index(i) print(d) type<-c("m","f","m","c","c","c") d<- cluster.index(i,num=type,Rindex=1) print(d)
Run the code above in your browser using DataLab