powered by
dudahart2(x,clustering,alpha=0.001)
dh
alpha
FALSE
1-alpha
cluster.stats
set.seed(98765) iriss <- iris[sample(150,20),-5] km <- kmeans(iriss,2) dudahart2(iriss,km$cluster)
Run the code above in your browser using DataLab