我有一些数据我将它转换为每周的时间序列，从2017年7月26日开始到2017年3月5日结束，这就是我所拥有的。 我执行了这个命令来获得这个
sensor <- msts(reshape2::dcast(data.post,sale.week~Reference,value.var='Quantite'),start = c(2016,30), seasonal.periods=c(7,52))
然后我这样做是为了预测所有数据
output <- lapply(sensor, function(x) forecast(tbats(x)))
但我不知道如何在预测后绘制每个参考的数量 我试过这个，但我得到了
ggplot(data = fc, aes(x=sale.year, y=Quantite, group=Reference)) + geom_line()
Error: ggplot2 doesn't know how to deal with data of class forecast
任何人都可以帮我提前谢谢你