> svmModel <- ksvm(as.matrix(a1[6:699]),
+ as.factor(a1$diagnosis),
+ type="C-svc",kernel="rbfdot",C=10,cross=5)
Using automatic sigma estimation (sigest) for RBF or laplace
kernel
> c_v=cross(svmModel)
> c_v
[1] 0.1090057
> hui=predict(svmModel )
> table(hui,a1$diagnosis)
错误于table(hui, a1$diagnosis) : 所有参数的长度都应一致
> pre=predict(svmModel,a2[6:699])
错误于votematrix[i, ret < 0] <- votematrix[i, ret < 0] + 1 :
下标赋值里不允许NA
> write.csv(data.frame(pre,class=a2$diagnosis, zu=a2$unit),
+ file="zpre.csv"
+ )
老是提示所有参数长度应该一致,但是参数没有缺失值啊,变量名也改了,还是跑不出来,怎么回事,求解?