# NOT RUN {
## load dermatology dataset
data(dermatology)
## obtain clustering solution using MCDC
sol <- mcdc(dermatology$x, 6)
## evaluate solution using external cluster validity measures
cluster_performance(sol$cluster, dermatology$c)
# }
Run the code above in your browser using DataLab