plotTrajectories | R Documentation |
Plots the output of trajectories for the given object.
plotTrajectories(object, ...)
## S4 method for signature 'data.frame'
plotTrajectories(
object,
response,
time = getOption("latrend.time"),
id = getOption("latrend.id"),
cluster = NULL,
facet = TRUE,
...
)
## S4 method for signature 'ANY'
plotTrajectories(object, ...)
## S4 method for signature 'lcModel'
plotTrajectories(object, ...)
object |
The data or model or extract the trajectories from. |
... |
Additional arguments passed to |
response |
Response variable |
time |
The time variable name. |
id |
The identifier variable name. |
cluster |
Cluster variable name. If unspecified, trajectories are not grouped. Alternatively, cluster is a vector indicating cluster membership per id. |
facet |
Whether to facet by cluster. |
trajectories plotFittedTrajectories plotClusterTrajectories
data(latrendData)
if (require("ggplot2")) {
plotTrajectories(latrendData, response = "Y", id = "Id", time = "Time")
plotTrajectories(
latrendData,
response = quote(exp(Y)),
id = "Id",
time = "Time"
)
plotTrajectories(
latrendData,
response = "Y",
id = "Id",
time = "Time",
cluster = "Class"
)
# compute cluster membership based on the mean being below 0
assignments <- aggregate(Y ~ Id, latrendData, mean)$Y < 0
plotTrajectories(
latrendData,
response = "Y",
id = "Id",
time = "Time",
cluster = assignments
)
}
data(latrendData)
method <- lcMethodLMKM(Y ~ Time, id = "Id", time = "Time")
model <- latrend(method, latrendData, nClusters = 3)
if (require("ggplot2")) {
plotTrajectories(model)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.