Estou tentando plotar meu modelo svm.

library(foreign)
library(e1071)

x <- read.arff("contact-lenses.arff")
#alt: x <- read.arff("http://storm.cis.fordham.edu/~gweiss/data-mining/weka-data/contact-lenses.arff")
model <- svm(`contact-lenses` ~ . , data = x, type = "C-classification", kernel = "linear")

A lente de contato arff é o arquivo de dados embutido no weka.

No entanto, agora eu encontro um erro ao tentar plotar o modelo.

 plot(model, x)
Error in plot.svm(model, x) : missing formula.