R 누적도수 그래프 (cumsum)

R 누적도수 그래프 (cumsum)

누적도수 히스토그램을 이해하기 위해 한 가지 예시를 들겠습니다. 아래 벡터를 이용하여 누적도수 히스토그램을 그릴 것입니다. 

data=c(1,2,2,3,3,3,4,4,4,4,5,5,5,5,5,6,6,6,6,6,6)

간격을 1로 설정하면 계급과 도수는 아래와 같습니다. 누적도수의 경우 간격을 1로 설정해야 그래프를 그리기가 수월합니다. 

0-1 : 1

1-2 : 2

2-3 : 3

3-4 : 4

4-5 : 5

5-6 : 6

누적도수로 나타내면 아래와 같습니다.

0-1 : 1

1-2 : 3

2-3 : 6

3-4 : 10

4-5 : 15

5-6 : 21

입력값이 히스토그램에 알맞지 않기 때문에 막대그래프로 그려야 합니다. 절차는 아래와 같습니다. 

1) 도수 계산 (hist 함수)

2) 누적도수 계산 (cumsum 함수)

3) 그래프 (barplot 함수)

아래는 최종 코드입니다. 

#데이터

data=c(1,2,2,3,3,3,4,4,4,4,5,5,5,5,5,6,6,6,6,6,6)

#히스토그램 for 도수계산

myhist=hist(data,seq(0,6,by=1))

#누적도수

counts_cum=cumsum(myhist$counts)

#막대그래프

barplot(counts_cum,names=myhist$breaks[-1])