Прогнозирование модели SVM

Question

data_list имеет разные наборы данных.

daily_svm <- dt_list
weekly_svm <- dt_list

for(i in seq_along(dt_list)){
      tmp <- dt_list[[i]]
      train <- tmp[1:(nrow(tmpdat)-486), ]
      test <- tmp[506:686,]

      d_svm <- svm(load ~ daily, data = train,
                        type = "eps-regression")

      daily_svm[[i]] <- predict(d_svm, test)

Я использую эту модель, но получаю эту ошибку. Ошибка в daily_svm [[i]] <- предсказать (d_svm, test): длина замены равна нулю </p>