R在运行SVM时抛出一个错误

Question

我在运行加载此数据集的代码时在R. 中运行SVM。我得到这个错误： 数据集位于here

https://www.dropbox.com/s/hyrk3o72kmmpsq5/ds.csv?dl=0

install.packages("e1071") 
install.packages("RTextTools") 
library(e1071) 
library(RTextTools) 

store_9<-read.csv("_1_9_after_join.csv") 
attach(store_9) 
x <- subset(store_9, select=-volume_sales) 
y <- volume_sales 
svm_model <- svm(volume_sales ~ ., data=store_9) 
summary(svm_model) 
svm_model1 <- svm(x,y) 
summary(svm_model1) 
pred <- predict(svm_model1,x) 
system.time(pred <- predict(svm_model1,x)) 
table(pred,y) 

error: 
> svm_model <- svm(volume_sales ~ ., data=store_9) 
Error in `contrasts<-`(`*tmp*`, value = contr.funs[1 + isOF[nn]]) : 
contrasts can be applied only to factors with 2 or more levels 

Answer 1

您的数据的独立变量的分类，但只有一个类别（换句话说，在R-说话，它只是一个因素变量）。根据对您的数据的快速扫描，它看起来像depart和snowfall都可能是一个问题。你也有几个数值变量似乎总是有相同的值，不应该在模型中（尽管它们不是错误的原因）。