R 支持向量机绘图

我试图绘制一个SVM分类。然而，我遇到了一个问题，我不知道如何解决。我看了文档和一些视频，但还是卡住了。这是我的密码

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

---

非常感谢您的帮助

我想这就是您想要做的：

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)

库（ISLR）
图书馆（e1071）
svm.oj2
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)