用SMO模型预测一个类属性，特征属性有数值型的有名义型的，然后画ROC曲线
但不知道是什么原因，老是提示格式无效。初学者还请多多指教，关乎毕业。代码如下：
da<-read.csv("G:/Rfile/da10normalize.csv")#输入规范化的数据
da1<-da[,c(2,3,7,8,22,23,25,34)]
set.seed(1234)
s<-sample(1:nrow(da1),round(0.9*nrow(da1),0))#取90%作为训练集
trainingda<-da1[s,]#训练集
testda<-da1[-s,]#测试集
mod_smo<-SMO(classification~.,data=trainingda,
             control = Weka_control(K=list("weka.classifiers.functions.supportVector.RBFKernel",G=8)))#构建模型
p_smo<-predict(mod_smo,newdata=testda[,1:7],type="class")
table(actual=testda$classification,pre=p_smo)
pred<-prediction(predict(mod_smo,newdata = testda[,1:7]),testda$classification)
Error in prediction(predict(mod_smo, newdata = testda[, 1:7]), testda$classification) :
Format of predictions is invalid.