# NOT RUN {
library(latrend)
data(OSA.adherence)
plotTrajectories(OSA.adherence, id = "Patient", time = "Biweek", response = "UsageHours")
# plot according to cluster ground truth
plotTrajectories(OSA.adherence, id = "Patient", time = "Biweek", response = "UsageHours",
cluster = "Group")
# }
Run the code above in your browser using DataLab