Fehler in der Tabelle "alle Argumente müssen die gleiche Länge haben"

Ich bekomme die obige Fehlermeldung, wenn Sie versuchen, um mein R-code (Naive Bayes-Modell mit e1071).

1) Setup: ich erstellt eine csv-Tabelle mit den folgenden sechs Bereichen:

dep variable    -> cncl_flag: 0,1

indep variables -> Channel:  red, blue, green, black 
                -> Age:      <1, 1-2, >2
                -> Cases:    0,1
                -> Products: product 1, product 2, ... , product 8
                -> Dollars:  <100, 100-200, ... , >1000

2) R-Code: Mit Hilfe der Tabelle oben beschrieben, und ich führen Sie den folgenden R-code:

myData<-read.csv("C:/Users/me/Desktop/R/NBC.csv", header = TRUE, sep = ",")

myData[,"train"] <- ifelse(runif(nrow(myData))<0.80,1,0)
trainColNum <- grep("train",names(myData))
trainmyData <- myData[myData$train==1,-trainColNum]
testmyData <- myData[myData$train==0,-trainColNum]


library(e1071)
nb_model <- naiveBayes(cncl_flag~.,data = trainmyData)

summary(nb_model)
nb_test_predict <- predict(nb_model,testmyData[,-1])
table(pred=nb_test_predict,true=testmyData$cncl_flag)

3) Ausgabe: Fehler in der Tabelle(pred = nb_test_predict, true = testmyData$cncl_flag) : alle Argumente müssen die gleiche Länge haben

4) Was ich versucht habe: ich entfernt alle Zeilen, die keine "NA" oder leere Ergebnisse