2017-12-13 3 views
-1

히스토그램에서 관찰 된 가장 자주 사용되는 10 개의 값 각각에 노란색 점선을 추가하려면 abline()을 사용해야합니다. 루프를 사용하는 것이 가장 좋은 방법이라고 생각합니다.하지만 시도했을 때 제대로 작동하지 않았습니다. 반복되는 10 줄의 코드를 작성하지 않고이 작업을 수행하는 가장 좋은 방법은 무엇입니까?루프를 사용하여 히스토그램에 선을 추가 R

+0

A [재현성 예]를 입력 해주세요 (http://stackoverflow.com/questions/5963269/how-to-make-a-great-r-reproducible-example). –

+0

그리고 [좋은 질문을 묻는 방법] (https://stackoverflow.com/help/how-to-ask)을 읽어보십시오. – chb

답변

0

hist에서 반환 값을 캡처하면이 값을 계산하는 데 필요한 모든 정보가 포함되어 있습니다. counts은 가장 높은 열 개의 막대를 선택할 수있게합니다. 노란색 선은 거의 보이지 않았으므로 빨간색으로 그려야합니다. 그러나 원하는 경우 색을 노란색으로 바꿀 수 있습니다.

set.seed(2017) 
Samp = sample(30, 1000, replace=TRUE) 
HSamp = hist(Samp, breaks=30) 
ToMark = tail(order(HSamp$counts), 10) 
abline(v=ToMark+0.5, lty=2, col="red") 

Lined histogram

관련 문제