小编Jay*_*Bee的帖子

如果条件满足,我试图绘制垂直线.

示例数据帧:

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)

当指标值为1时,截距中的X是X的值.所以在这种情况下,我只想要指标值为1时的垂直线.在这个例子中,这将在X =处创建一条垂直线1和X = 3.有没有人对如何解决这个问题有任何想法？谢谢!