昨天在论坛发起求助帖,得到大神的指点。由于当时尚未完全理清图形思路,现在需要对图形进行更新。再次发起求助帖,请大家帮忙。
数据见链接
https://bbs.pinggu.org/a-3525105.html
原来的求助帖
附件数据,采用LOESS方法,画出目标图形中的实线(Y)以及阴影区域(MIN-MAX)。虚线及竖线不需要。
- library(tidyverse)
- df %>%
- ggplot(aes(x = 1:12, y = Y)) +
- geom_ribbon(aes(ymin = MIN, ymax = MAX), fill = "grey70") +
- geom_line() +
- scale_x_continuous(breaks = 1:12, labels = df$TIME)
现在想增加水平方向的虚线,即数据库中的xuxian变量
请教如何增加这条线?以及r作图背景是白色