# NOT RUN {
m <- lcMethodMixtoolsGMM(Value ~ 1)
m2 <- update(m, formula = ~ . + Time)
m3 <- update(m2, nClusters = 3)
k <- 2
m4 <- update(m, nClusters = k) # nClusters: k
m5 <- update(m, nClusters = k, .eval = TRUE) # nClusters: 2
# }
Run the code above in your browser using DataLab