如果满足条件,我想要绘制垂直线。
数据框示例:
require(ggplot2)
require(dplyr)
example <- data.frame(
X = c (1:5),
Y = c(8,15,3,1,4),
indicator = c(1,0,1,0,0)
)
example %>% ggplot(aes(x=X,y=Y)) + geom_line() + geom_vline(xintercept=X)
在截距中,X的值是指当指示器为1时,X的值。因此,在这种情况下,我只想要当指示器值为1时的垂直线。在这个例子中,这将在X=1和X=3处创建垂直线。有没有人对如何解决这个问题有什么想法?谢谢!