Como faço para destacar a lixeira de uma observação em um histograma em r

Question

Quero criar um histograma a partir de várias observações (ou seja, D <- C (1,2,1,3.4,4.5)) e, em seguida, destaque a lixeira em que uma observação específica se enquadra, de modo que eu tenho uma saída que se pareça com a seguinte:

Como faço isso em r?

Answer 1

Expandindo a resposta de DangerStat, aqui está uma pequena função que encontrará automaticamente qual compartimento contém o valor que você deseja destacar:

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, ...)
}

Agora

x <- rnorm(100)
highlight(x, 1.2, "red")

destacará a lixeira com 1.2 em vermelho.

Answer 2

x = rnorm(100)
hist(x,br=10,col=c(rep(0,9),1))

Claramente, isso vai colorir a última coluna, então ajuste o col = bit para suas necessidades

Obrigado

DangerStat