Partial Least Squares 1

Log in om je oplossingen te testen.
set.seed(1) x <- model.matrix(medv ~ ., Boston)[, -1] y <- Boston$medv train <- sample(1:nrow(Boston), nrow(Boston) / 2) test <- (-train) y.test <- y[test] pls.fit <- ... pls.pred <- ... pls.mse <- ...
Je kunt zo vaak indienen als je wenst. Er wordt enkel rekening gehouden met je laatst ingediende oplossing.
Log in om je oplossingen te testen.