R의 히스토그램에 평균값을 더하십시오.

Question

평균 (평균) 값이있는 히스토그램을 그립니다 (예 : 파란색, 굵은 선으로 표시). plot 명령을 사용하여 작업을 시도하지만 매개 변수를 추가하더라도 "add = TRUE" 작동하지 않습니다.

Answer 1

당신은 음모에 라인을 추가 abline()를 사용할 수 있습니다

x <- rnorm(100) 
mx <- mean(x) 
hist(x) 
abline(v = mx, col = "blue", lwd = 2) 

도에서보세요 (골 및 LWD 같은) 그래픽 매개 변수 파?.

편집 : 코멘트에 당신의 질문에 대해서는

:
당신은 또한 라인을 사용하여 라인을 플롯 할 수 있습니다().
text()가 텍스트로 사용됩니다.
인수 cex는 "문자 확장 인수"를 설명합니다.

또한 R. 기본적인 플롯의 개요를 Quick-R를 보라

x <- rnorm(100, mean = 10) 
mx <- mean(x) 
hist(x) 
lines(c(mx,mx), c(0,15), col = "red", lwd = 2) 
lines(c(10, 11.5), c(0, 10), col = "steelblue", lwd = 3, lty = 22) 
text(mx, 18 , round(mx, 2)) 
text(mx, 12 , "big", cex = 5) 

Answer 2

hist(data) 
abline(v=mean(data),col="blue") 

Answer 3

당신이 ggplot2 패키지의 나의 선호하는 옵션입니다 사용하여 더 많은 열이 데이터 프레임이있는 경우 :

ggplot (data, aes (x = colname)) + geom_vline(xintercept=mean(data$colname), color="red") 

을 Colname은 히스토그램과 평균을 그리려는 data.frame의 열입니다.

Answer 4

평균 라인이 표시되지 않는 문제가 발생하여 그 이유를 파악하는 데 도움이되는 오류가 발생하지 않았습니다. 누락 된 데이터가 있기 때문에 아무 것도 일어나지 않았 음을 알았으므로 평균은 NA로 계산되었습니다. mean() arg에 na.rm = T을 추가하면 실수가 발생하고 평균 행이 나타납니다. 글을 쓸 가치가없는 간단한 감독과 간단한 수정이지만, 어쨌든 누군가에게 슬픔을 덜어주기 위해 게시하고 있습니다.

hist(data$Defect.rate, 
xlim = c(0, 1), 
col = "light blue") 

abline(v = mean(data$Defect.rate, na.rm = T), 
      col = "red", 
      lwd = 2)