if (FALSE) {
if (reticulate::py_module_available("stepmix")) {
require(stepmixr)
model1 <- stepmix(n_components = 3, n_steps = 2, measurement = "continuous", progress_bar = 0)
X <- iris[c(1:10, 51:60, 101:110), 1:4]
fit1 <- fit(model1, X)
fit1_bs <- bootstrap(fit1, X, n_repetitions = 5, progress_bar = FALSE)
}
}
Run the code above in your browser using DataLab