r语言 在ggplot图上手动添加半封闭线段

您可以使用geom_segment()函数在ggplot图中添加半封闭线段。以下是一个示例代码：

library(ggplot2)

# 创建数据框
df <- data.frame(x = c(1, 2, 3, 4, 5), y = c(2, 4, 6, 8, 10))

# 创建ggplot图
ggplot(df, aes(x, y)) + 
  geom_point() + 
  geom_segment(x = 2, y = 0, xend = 2, yend = 4, 
               linetype = "dashed", color = "red", size = 1.5) +
  xlim(0, 6) + ylim(0, 12)

在此示例中，我们在x = 2处添加了一个半封闭线段，该线段从y = 0到y = 4，并使用虚线和红色颜色进行了样式化。您可以根据需要更改线段的位置，样式和颜色。