# NOT RUN {
data(latrendData)
if (require("kml")) {
model <- latrend(method = lcMethodKML("Y", id = "Id", time = "Time"), latrendData)
predictAssignments(model, newdata = data.frame(Id = 999, Y = 0, Time = 0))
}
# }
Run the code above in your browser using DataLab