我试图找到朴素贝叶斯算法预测的准确性。它给了我这个错误
Error in table(test[, 1], fit1) : all arguments must have the same length
这是我的代码：
nbbayes=naiveBayes(train[,-1],train[,1],data=train)
newdata=test[,-1]
newdata
fit1=predict(nbbayes,newdata)
fit1
tab1=table(test[,1],fit1)
accuracy_nb=sum(diag(tab1))/(sum(tab1))