r - 使用朴素预测时二元运算符的非数字参数

Question

我正在尝试构建幼稚的预测模型，当我运行我的代码时：

newmls<-c("SFAttachBenchmark","THouseBenchmark","ApartBenchmark","SFDetachBenchmark","Date")

dat1<-dat[newmls]

dat2<-na.omit(dat1)
glimpse(dat2)

dat3<-as.numeric(unlist(dat2))

dt = sort(sample(nrow(dat3), nrow(dat3)*.85))
train<-dat3[dt,]
test<-dat3[-dt,]
nrow(train);nrow(test)

dat_ts<-ts(train[,5],start=c(2014,01),end=c(2021,12), frequency=12)



mape<-function(actual,pred){
mape<-mean(abs((actual-pred)/actual))*100
return(mape)
}
#naive forecasting

 naive_mod<-naive(dat_ts,h=12)

我收到一个错误：

Error in -.default(y, fitted): non-numeric argument to binary operator. 

现在在我的数据集中，有些日期我已将它们转换为，as.date但这似乎并不能解决问题。关于如何去做的任何想法？

标签： rmachine-learningforecasting