Support Vector Classifier 1a

Sign in to test your solution.
set.seed(2077) x <- matrix(rnorm(20 * 2), ncol = 2) y <- c(rep(-1, 10), rep(1, 10)) x[y == 1,] <- x[y == 1,] + 1 dat <- data.frame(x = x, y = as.factor(y)) svmfit <- ... nSV <- ... MC1 <- ...
You can submit as many times as you like. Only your latest submission will be taken into account.
Sign in to test your solution.