# NOT RUN {
data(latrendData)
if (rlang::is_installed("lcmm")) {
method <- lcMethodLcmmGMM(
fixed = Y ~ Time,
mixture = ~ Time,
random = ~ 1,
id = "Id",
time = "Time", ,
nClusters = 2
)
gmm <- latrend(method, data = latrendData)
summary(gmm)
method <- lcMethodLcmmGMM(
fixed = Y ~ Time,
mixture = ~ Time,
random = ~ Time,
id = "Id",
time = "Time",
nClusters = 3
)
}
# }
Run the code above in your browser using DataLab