对比只适用于有两个或多于两个层次的因子

我推测是某些整数变量作为因子类型处理了

model<-svm(f~.,data=train_svm)

   Warning message:

   In svm.default(x, y, scale = scale, ..., na.action = na.action) :

     Variable(s) ‘X.p.194.’ constant. Cannot scale data.

train_svm$p194 的数据都是一样的无法scale,所以可以

        colnames(train_svm)  <- c(paste('p',c(1:(nday*96+ex))),'f')

       t1 <- data.frame(scale(train_svm))

       t2 <- which(is.na(t1[1,]))

       if (length(t2) >0) train_svm <- train_svm[,-t2]  ＃需要条件控制，否则如果t2为空，train_svm会取空