8.4 데이터 레이블 표시하기

이번에는 각 막대 그래프에 고속도로 연비의 평균값을 text() 함수를 이용하여 문자열로 표시해 보겠습니다.

먼저 barplot() 함수 전체를 변수 bp로 변환해 줍니다.

이제 text() 함수의 x 축의 모수의 값으로 bp를 대입해 주고, y 축으로 dd$MPG.mean을 대입해 줍니다.

그리고 labels = 모수에 출력될 문자열을 지정해 주어야 하는데, round() 함수를 이용하여 소숫점 이하는 반올림처리 해 줍니다.

또한 pos = 모수의 값으로 3을 입력하여 막대의 위로 문자열의 출력 위치를 지정해 줍니다.

bp <- barplot(dd$MPG.mean, 
        main = "자동차 유형별 평균 고속도로 연비 : 데이터 레이블",
        xlab = "자동차 유형",
        ylab = "고속도로 연비",
        names.arg = names, 
        col = rainbow(6),
        ylim = c(0, 40))

text(x = bp,
     y = dd$MPG.mean,
     labels = round(dd$MPG.mean,0),
     pos = 3
     )

Figure 8.3: 자동차 유형별 평균 고속도로 연비 : 데이터 레이블

Go Top