我在为包SVM
中的垃圾邮件数据集绘制分类结果时遇到问题kernlab
。
代码:
require(kernlab)
data(spam)
index <- sample(1:dim(spam)[1])
spamtrain <- spam[index[1:floor(dim(spam)[1]/2)], ]
spamtest <- spam[index[((ceiling(dim(spam)[1]/2)) + 1):dim(spam)[1]], ]
filter <- ksvm(type~.,data=spamtrain,kernel="rbfdot",kpar=list(sigma=0.05),C=5,cross=3)
plot(filter, data=spamtrain)
错误:
Error in `[.data.frame`(expand.grid(lis), , labels(terms(x))) :
undefined columns selected