我工作的公司正在测试新软件的预测能力。一个包从多个地点接受单一产品的订单,在每个时期对它们进行汇总,然后开发一个模型,然后在每个地点使用该模型。例如,如果在 6 个月期间,地点 A 订购产品如下 (1,0,2,3,0,3),而 B 订购相同产品 (2,3,4,2,5,1) ,则软件会根据数据 A+B=(3,3,6,5,5,4) 开发一个模型,并将该模型分别应用于 A 和 B 中的数据,以确定第 7 个月的值。
我想通过使用 R 来尝试验证(或无效)他们的方法。我创建了一系列单指数平滑模型(称为 ssforecasts)并希望在新的位置数据上使用这些模型,如下所示:
ss<-c(29,36,36,48,93,28,35,28,37,50,37,3,25,28,40,45,38,43,34,44,43,25,33,34)
ss2<-t(ss)
for (i in 1:12){
sseries<-ts(ss2[c(i:(11+i))],frequency=12)
ssforecasts <- HoltWinters(sseries, beta=FALSE, gamma=FALSE)
newss <- ts(c(3,3,1,4,1,3,8,0,4,3,3,0),frequency=12)
predict(ssforecasts,t(newss))
}
其中 news 是我希望模型(ssforecasts)作用的位置数据。问题是我收到以下错误,我无法解释。
rep(as.vector(object$coefficients[1L]), n.ahead) 中的错误:无效的“次”参数