score.items
and cluster.cor
functions require a matrix of keys. cluster2keys does this.cluster2keys(c)
cluster.cor
,score.items
test.data <- Harman74.cor$cov
kc <- kmeans(test.data,4)
keys <- cluster2keys(kc)
keys #these match those found by ICLUST
cluster.cor(keys,test.data)
Run the code above in your browser using DataLab