r:如何在ggplot中连接换行符

时间:2018-03-21 00:43:16

标签: r ggplot2 time-series

重复使用此问题中的示例,但针对不同的问题; Plot time series and forecast simultaneously using ggplot2

正如您所看到的,我的观察与观察之间存在差距。和我的预测' (350和351之间)。

为什么会有差距?我有1天的预测,图表中完全没有预测线本身。请帮忙!

1 个答案:

答案 0 :(得分:1)

这是因为你的最后一次“观察”是在时间= 350时进行的。

df[df$time>349 & df$time<=351,]
##   time          M         isin
## 26  350 -0.2180864 observations
## 27  351  1.2246175  my_forecast
## 51  351  3.7502526  upper_bound
## 75  351 -1.3010176  lower_bound

您可以在时间= 351处添加数据点,如果要连接它们,则isin =观察。

df<-rbind(df,data.frame(time=c(351),M=c(1.2246175),isin=c("observations")))
ggplot(df, aes(x = time, y = M, color = isin)) + geom_line()