以阅读字符为因子和无因子的R中朴素贝叶斯预测

我试着用天真的贝叶斯。数据集是

8124*23

，第一列作为响应变量

{'sabible'，'toxic'}

。我已经消除了丢失的数据。最后，数据集是

5644*23

。下面是我使用的代码

mushroom.data <- read.csv("mushroom.data",header = FALSE, stringsAsFactors = FALSE)
#mushroom.data <- read.csv("mushroom.data",header = FALSE, stringsAsFactors = TRUE)

#Eliminating missing data
mushroom.data <- subset(mushroom.data,mushroom.data$V12 != '?')
# Factoring target class
mushroom.data$V1 <- as.factor(mushroom.data$V1)
# First 4000 records as Training set. 
mushroom.train.class <- mushroom.data[1:4000,1]
mushroom.train.data <- mushroom.data[1:4000,-1]
# Building naive bayes classifier
nb.model <- naiveBayes(mushroom.train.data,mushroom.train.class,laplace = 1)
# Last 1644 are Test records
mushroom.test.data <- mushroom.data[4001:5644,-1]
mushroom.test.class <- mushroom.data[4001:5644,1]
# Predicition
nb.pred <- predict(nb.model,mushroom.test.data)
# checking proportions of the predictions
prop.table(table(nb.pred))

---

蘑菇.data不能使用朴素贝叶斯对角色建模。检查“NaiveBayes并查看参数”部分。
您能提供一小部分数据来说明此问题吗？此链接不起作用！请在这篇文章中包含所有相关代码。将您的示例简化为几行数据。一旦你开始工作，也许你可以开始添加变量和数据，看看这可能是什么原因@ChirayuChamoli