# NOT RUN {
data(latrendData)
m <- lcMethodKML("Y", id = "Id", time = "Time")
model <- latrend(method = m, data = latrendData)
fittedTrajectories(model)
fittedTrajectories(model, at = time(model)[c(1, 2)])
# }
Run the code above in your browser using DataLab