支持向量机绘图

Question

我试图绘制SVM分类。但是我遇到了一个我不知道如何修复的问题。我查看了文档和一些视频，但仍然卡住了。这是我的代码

library(ISLR)
svm.oj2 <- svm(Purchase~.,data=OJ,kernel='linear',cost=1,scale = F)
plot(svm.oj2,data=OJ)

这是错误：

 Error in plot.svm(svm.oj2, data = OJ) : missing formula.

非常感谢任何帮助

Answer 1

我认为这就是你要做的事情：

library(ISLR)
library(e1071)
svm.oj2 <- svm(Purchase~.,data=OJ,kernel='linear',cost=1,scale = F)

plot(OJ, col = 1:1000 %in% svm.oj2$index + 1)