将一个自定义条添加到 R 中的条形图答案

【问题标题】：Add one custom bar to a bar graph in R将一个自定义条添加到 R 中的条形图
【发布时间】：2018-09-30 20:54:41
【问题描述】：

我目前在 R (ggplot2) 中有一个条形图，其中 y 轴上是账户的美元金额，x 轴上是从 1990 年代到当前的年份。我想在 2017 年的 5000 万美元点处添加一条线 - 表示上限。我想知道我是否可以在 R 中执行此操作，或者我必须在导出后自定义图像。我还想为 2018 年和 2019 年添加一两个“预计数量”条，这些条是透明的，带有虚线轮廓，表示它们是预测。这可能吗？

【问题讨论】：

请使用dput()（不是str或head或图片/屏幕截图）分享您的数据样本，以便其他人可以提供帮助。在此处查看更多信息stackoverflow.com/questions/5963269/…
在你的控制台执行这个：install.packages("fortunes"); fortunes::fortune("Yoda")

标签： r bar-chart graph-visualization

【解决方案1】：

如果您发布您的数据和代码，那当然是！

如果您使用的是 ggplot：添加此行，将 y 和 yend 值替换为 50（调整 y 轴所在的任何单位）。如果您只希望条形图出现在某些 x 值上，请使用 x 和 xend 参数。

  annotate(geom = 'segment', y = Inf, yend = Inf, x = -Inf, xend = Inf,color = 'black',  size = 2)

对于透明线，使用 alpha 参数；对于虚线，使用线型：

  annotate(geom = 'segment', y = Inf, yend = Inf, x = -Inf, xend = Inf,color = 'black',  size = 2, alpha = .1, linetype="dashed")

【讨论】：