创建一个接受数字向量的函数。目标是使用指数平滑进行预测。
公式是(是实际值并且是预测值) - + 1 = +( - )
函数的输出应该是一个包含两列的数据框 - 实际值和预测值。为。
设置默认值0.8ExpForecast = function(v,alpha = 0.8)
{
ResultMatrics1 = data.frame()
for (i in 2:length(v))
{
a = data.frame(v[i],(ResultMatrics1[(i-1),2]))
+alpha*(v[(i-1)]-ResultMatrics1[(i-1),2])
ResultMatrics1 = rbind(ResultMatrics1,a)
}
return(ResultMatrics1)
colnames(ResultMatrics1) = c("y","y_hat")
}
ExpForecast(v=c(2,5,13,24,53))
每次,R给我“data.frame中的错误(v [i],(ResultMatrics1 [(i - 1),2])): 参数意味着不同的行数:1,0“。谁能知道什么是错的?