ld <- gald()
kml(ld,2:5,5)
kml(ld,16,5)
par(ask=TRUE)
### Default ploting
plotAll(ld)
### Only the calinski criterion (same effect than plotCalinski(ld))
plotAll(ld,printCal=TRUE,printTraj=FALSE,printSub=FALSE)
### Groups and sub-groups
plotAll(ld,printCal=FALSE,printTraj=TRUE,printSub=TRUE)
plotAll(ld,printCal=FALSE,printTraj=TRUE,printSub=TRUE,colorTraj="black",colorMean="no",colorMeanSub="black")
### All at once
plotAll(ld,printCal=TRUE,printTraj=TRUE,printSub=TRUE)
### To see the clusterization with only 2 clusters
plotAll(ld,2,printCal=FALSE,printTraj=TRUE,printSub=TRUE)
### To see the third clusterization with 16 clusters
plotAll(ld,c(16,3),printCal=FALSE,printTraj=TRUE,printSub=TRUE)
par(ask=FALSE)
Run the code above in your browser using DataLab