#######################
### calculMean
### Some LongitudinalData
traj <- as.cld(gald())["traj"]
### A partition
part <- partition(floor(runif(200,1,5)),4)
### Clusters center
calculMean(traj,part)
Run the code above in your browser using DataLab