我使用e1071
生成了朴素的贝叶斯分类器,然后运行了以下内容
test <- as.data.frame(readRDS('ContactsComplaints2014.rds'))
load(file='data2015.nb.RData')
prediction <- predict(data2015.nb,subset(test[1:3000,], select=-c(didComplain)))
在终端我进入
> prediction
并得到
factor(0)
Levels:
为什么?
最佳答案
您需要标记要分类为as.factor()
的类的名称。然后它将起作用。