最佳答案
扩展一下dangerstat的答案,这是一个小功能,它将自动查找哪个bin包含要突出显示的值:
highlight <- function(x, value, col.value, col=NA, ...){
hst <- hist(x, ...)
idx <- findInterval(value, hst$breaks)
cols <- rep(col, length(hst$counts))
cols[idx] <- col.value
hist(x, col=cols, ...)
}
现在
x <- rnorm(100)
highlight(x, 1.2, "red")
将以红色突出显示带有1.2的垃圾箱。