svm e1071 cutoff code example

Example: svm e1071 cutoff

#you need covert y to factors
model <- svm(as.factor(vs) ~ hp+mpg+gear,data=mtcars)
predict(model)