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