错误: 没有"ibrary"这个函数
>     training<-x                ###训练集
错误: 找不到对象'x'
>     testing<-y                  ###测试集
错误: 找不到对象'y'
>     trainingTarget<-z        ###训练集的已知结果
错误: 找不到对象'z'
>     #建立SVM
>     svm<-svm(x=training,y=trainingTarget,cost=COST,gamma=GAMMA)
Error in svm(x = training, y = trainingTarget, cost = COST, gamma = GAMMA) :
  找不到对象'training'
>     #做预测
> local({pkg <- select.list(sort(.packages(all.available = TRUE)),graphics=TRUE)
+ if(nchar(pkg)) library(pkg, character.only=TRUE)})
>     pred<-predict(svm,testing)
Error in UseMethod("predict") :
  "predict"没有适用于"function"目标对象的方法
>