# NOT RUN {
data(latrendData)
methods <- lcMethods(lcMethodKML("Y", id = "Id", time = "Time"), nClusters = 1:3)
models <- latrendBatch(methods, data = latrendData)
models <- latrendBatch(lcMethods(lcMethodKML("Y", id = "Id", time = "Time"), nClusters = 1:2),
data = .(subset(latrendData, Time > .5),
subset(latrendData, Time < .5))) # different data per method
# }
Run the code above in your browser using DataLab