#################
### Data generation
dn <- as.cld(gald())
### Trying several clusters number and several starting condition
kml(dn)
### Display the quality criterion, both way :
plotAllCriterion(dn)Run the code above in your browser using DataLab