# NOT RUN {
pls(num_comp = 2, num_terms = 10) %>%
set_engine("mixOmics") %>%
set_mode("regression") %>%
translate()
pls(num_comp = 2, num_terms = 10) %>%
set_engine("mixOmics") %>%
set_mode("classification") %>%
translate()
pls(num_comp = 6) %>%
set_engine("mixOmics") %>%
set_mode("regression") %>%
translate()
pls() %>%
set_engine("mixOmics") %>%
set_mode("classification") %>%
translate()
model <- pls(num_terms = 10)
model
update(model, num_terms = 1)
update(model, num_terms = 1, fresh = TRUE)
# }
Run the code above in your browser using DataLab