### Generation of some data
cld1 <- as.cld(generateArtificialLongData())
### We suspect 2, 3 4 or 5 clusters, we want 3 redrawing.
# And we want to "see" what happen (so print="all")
#kml(cld1,2:6,3,print="all")
### 3 seems to be the best. But to be sure, we try more redrawing 3 or 6 only.
# We don't want to see again, we want to get the result as fast as possible.
#kml(cld1,c(3,6),10)
Run the code above in your browser using DataLab