플롯에 상자 추가

Question

내 데이터 배포의 오른쪽 꼬리 부분에 막대를 강조하고 싶습니다. 너무 작기 때문에이 작업을 수행하는 가장 좋은 방법은 막대 주위에 빨간색 여백이있는 상자를 추가하는 것입니다 (x 축의 25.0 레벨). 히스토그램 플롯에 이러한 상자를 추가하는 방법은 무엇입니까?

미리 감사드립니다.

Answer 1

바와 국경 독립적 모두 착색 할 수있다. 그러나 그걸 위해서 당신은 얼마나 많은 사람들이 있는지 알아야합니다!

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)