# NOT RUN {
data(OSA.adherence)
if (require("ggplot2")) {
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