У меня есть гистограмма, как показано на рисунке. Я хочу, чтобы полосы в двух областях были соответственно красными и зелеными, т.е. Полосы от 0 до первой черной границы слева должны быть окрашены в красный цвет, а полосы во второй области должны быть окрашены в зеленый цвет. Можно ли это сделать в R? Код, используемый для получения гистограммы,
hist(pr4$x[pr4$x[,1]>-2,1],breaks=100)
Лучший способ сделать это - разрешить hist выполнять вычисления для вас, но затем использовать hist (снова) для фактического построения графика. Вот пример:
set.seed(1)
x <- rnorm(1000)
h <- hist(rnorm(1000), breaks=50, plot=FALSE)
cuts <- cut(h$breaks, c(-Inf,-.5,1.75,Inf))
plot(h, col=cuts)
В последней строке .5 и 1.75 указаны пороговые значения, в которых вы хотите иметь разные цвета.
Примечание: в моем исходном ответе используется barplot, но эта стратегия делает работу с осями трудной.
Здесь результат:
Здесь метод, который я упомянул в комментариях:
Сделайте несколько тестовых данных (вы должны сделать это в своем вопросе!)
test = runif(10000,-2,0)
получить R для вычисления гистограммы, но не построить ее:
h = hist(test, breaks=100,plot=FALSE)
Ваша гистограмма делится на три части:
ccat = cut(h$breaks, c(-Inf, -0.6, -0.4, Inf))
сюжет с этой палитрой, неявное преобразование коэффициента в число индексов палитры:
plot(h, col=c("white","green","red")[ccat])
ggplot2 также доступны решения.
Попробуйте следующее:
hist(pr4$x[pr4$x[,1]>-2,1],breaks=100, col = c(rep("white", 69), rep("green", 15), rep("red", 16)))
Вам может потребоваться отрегулировать номер повтора для каждого цвета в зависимости от количества разрывов внутри гистограммы.