# NOT RUN {
# using all dimensions
mp <- mstomp(mp_toy_data$data[1:200,], 30, verbose = 0)
# using threads
mp <- mstomp_par(mp_toy_data$data[1:200,], 30, verbose = 0)
# }
# NOT RUN {
# force using dimensions 1 and 2
mp <- mstomp(mp_toy_data$data[1:200,], 30, must_dim = c(1, 2))
# exclude dimensions 2 and 3
mp <- mstomp(mp_toy_data$data[1:200,], 30, exc_dim = c(2, 3))
# }
Run the code above in your browser using DataLab