在绘图上添加一个框

【问题标题】：Add a box on a plot在绘图上添加一个框
【发布时间】：2014-09-23 09:58:57
【问题描述】：

我想突出显示我的数据分布右尾的条形。由于它太小，我认为最好的方法是在条形周围添加一个带有红色边距的框（x 轴上的 25.0 水平）。如何在直方图上添加这样的框？

提前致谢。

【问题讨论】：

this question 可能会有所帮助。如果这不是你想要的，你可以用一些代码更新你的问题吗

标签： r histogram

【解决方案1】：

可以单独为条形及其边框着色。但为此你需要知道你有多少人！

这是一个命题，当你想要做的是把右边的第一个小节挑出某个值（这里是 1.96）时：

set.seed(123)
x <- rnorm(100)
res.hist <- hist(x, plot=FALSE)

n_bars <- length(res.hist$mids)
left_lim <- res.hist$breaks[1:n_bars]
col_bars <- c("steelblue", "gold")[ diff(left_lim >= 1.96) + 1 ]
col_borders <- c(NA, "red")[ diff(left_lim >= 1.96) +1 ]

plot(res.hist, col=col_bars, border=col_borders)

【讨论】：