### Empty partition
partition()
### Small partition
partition(clusters=c("A","B","A","C","C"))
### Random partition
partition(clusters=LETTERS[floor(runif(100,1,5))])
### Partition that clusters correctly some data
### Quality criterion are high
data(artificialLongData)
traj <- as.matrix(artificialLongData[,-1])
partition(clusters=rep(1:4,each=50),traj)
### Partition that does not cluster correctly the data
### Quality criterion are low
partition(clusters=rep(1:4,50),traj)
Run the code above in your browser using DataLab