"RTextTools" create_matrix получил сообщение об ошибке

Я запускал пакет RTextTools для создания модели классификации текста.

И когда я готовлю набор данных предсказания и пытаюсь преобразовать его в матрицу. Я получил ошибку как:

Error in if (attr(weighting, "Acronym") == "tf-idf") weight <- 1e-09 : 
  argument is of length zero

Мой код выглядит следующим образом:

table<-read.csv("traintest.csv",header = TRUE)
dtMatrix <- create_matrix(table["COMMENTS"])
container <- create_container(dtMatrix, 
                              table$LIKELIHOOD_TO_RECOMMEND, 
                              trainSize=1:5000,testSize=5001:10000, 
                              virgin=FALSE)
model <- train_model(container, "SVM", kernel="linear", cost=1)

predictionData<-read.csv("rest.csv",header = TRUE)
**predMatrix <- create_matrix(predictionData["COMMENTS"],originalMatrix=dtMatrix)**
Error in if (attr(weighting, "Acronym") == "tf-idf") weight <- 1e-09 : 
      argument is of length zero

Ошибка была указана последним кодом (полужирный) Я попробовал поиск в google, но не видел четкого решения.

Спасибо

Ответ 1