11
평균 (평균) 값이있는 히스토그램을 그립니다 (예 : 파란색, 굵은 선으로 표시). plot 명령을 사용하여 작업을 시도하지만 매개 변수를 추가하더라도 "add = TRUE" 작동하지 않습니다.R의 히스토그램에 평균값을 더하십시오.
A
답변
21
당신은 음모에 라인을 추가 abline()를 사용할 수 있습니다
x <- rnorm(100)
mx <- mean(x)
hist(x)
abline(v = mx, col = "blue", lwd = 2)
편집 : 코멘트에 당신의 질문에 대해서는
:
당신은 또한 라인을 사용하여 라인을 플롯 할 수 있습니다().
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)
+0
더 짧은 라인을 만들고 그 번호에 추가하는 방법이 있습니까? 추가 된 텍스트에 글꼴 크기를 어떻게 할당합니까? –
+0
내 수정 사항보기 ... – EDi
10
hist(data)
abline(v=mean(data),col="blue")
+2
초 더 빠르다 ... – EDi
+0
"vertical"매개 변수에 대해 명시적인 v가 누락되었습니다. – espaciomore
5
당신이 ggplot2 패키지의 나의 선호하는 옵션입니다 사용하여 더 많은 열이 데이터 프레임이있는 경우 :
ggplot (data, aes (x = colname)) + geom_vline(xintercept=mean(data$colname), color="red")
을 Colname은 히스토그램과 평균을 그리려는 data.frame의 열입니다.
1
평균 라인이 표시되지 않는 문제가 발생하여 그 이유를 파악하는 데 도움이되는 오류가 발생하지 않았습니다. 누락 된 데이터가 있기 때문에 아무 것도 일어나지 않았 음을 알았으므로 평균은 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)
커뮤니티에 오신 것을 환영합니다. 아래의 해답이 문제를 해결했다면 그 중 하나를 솔루션으로 표시해야합니다 (그 옆에있는 작은 확인란을 클릭하십시오). 그리고 미래의 문제들에 대해서는 테스트 데이터를 다시 만들어야하는 것에 대한 해답을 제공하는 사람들이 (EDi의 솔루션의 처음 두 줄을 참고할 것입니다) 피할 수있는 문제를 설명하는 데이터 세트를 제공하십시오. 감사! –