预测v7＆ggplot2图形为自动插图添加拟合线

Question

我正在浏览Rob J Hyndman的教程，这里是the link for the tutorial，我的问题是如何在预测图中添加拟合线，例如;

library(forecast)
library(ggplot2)
fc <- forecast(fdeaths)
autoplot(fc)

我现在需要在上面的情节中添加fitted(fc)to，我该怎么做？

Answer 1

这是另一个没有附加包的解决方案：

fit <- data.frame(data=as.matrix(fitted(fc)), date=time(fitted(fc)))
autoplot(fc) + geom_line(data = fit,aes(date,data), col = "red")

您可以将ts转换为数据框，您可以使用normal ggplot命令。然后，您只需添加该行。我意识到如果没有加载包ggfortify我的解决方案是有效的