r - 根据 hist 中的值绘制条件颜色

Question

是否可以只用一种颜色绘制条件为 X < 980 的条形图？在下面的直方图中。

R代码:

Sample <- rnorm(2500,1000,20) # 2500 norm values
plot(Sample, col = ifelse(Sample < 980,'red','green')) # Paint in 'red' when X<980

Answer 1

您可以根据每个 bin 的中点来确定颜色。

Sample <- rnorm(2500, 1000, 20)
h <- hist(Sample, plot = FALSE)
hist(Sample, col = ifelse(h$mids < 980, 'red', 'green'))