r - 标题和副标题之间的ggplot2行

Question

有没有办法在 ggPlot 的标题和副标题之间包含一条线，如分隔符？我知道如何给标题的背景上色（见这篇文章）

标签： rggplot2

Answer 1

一种可能的解决方案是使用geom_segmentwhile 设置手动跟踪段：clip = "off"coord_cartesian

df <- data.frame(x = 1:10,
                 y = 2:11)

ggplot(df, aes(x = x, y = y))+
  geom_point()+
  labs(title = "Main Title", subtitle = "Subtitle")+
  coord_cartesian(clip ="off")+
  geom_segment(x =0.5, xend = 2.5, y = 12.1, yend = 12.1)

您必须根据要绘制的数据调整位置，但这是一种可能的解决方案