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