### Creation of articficial data
cld1 <- gald3d(20)
### Clusterisation (real analysis needs at least 20 redrawings, not 2)
kml3d(cld1,nbRedrawing=2,toPlot='both')
### Selection of the clustering we want
# (note that "try" is for compatibility with CRAN only,
# you probably can use "choice(cld1)")
try(choice(cld1))
Run the code above in your browser using DataLab