8.5 x축 눈금 표시하기

그런데 조금 아쉬운 부분이 보입니다. X축의 눈금이 보이지 않습니다. 이제 X축에 눈금을 그려 보겠습니다.

먼저의 눈금의 간격을 x로 하고, seq() 함수를 이용하여 지정해 줍니다.

그런 다음, X축에 눈금을 그리기 위해서는 axis() 함수를 이용할 수 있습니다. 자세한 내용은 다음의 스트립 내에 있는 주석문을 참고하기 바랍니다.

그리고 Y축의 범위도 0~40으로 조정해 줍니다.

bp <- barplot(dd$MPG.mean, 
        main = "자동차 유형별 평균 고속도로 연비 : X축 눈금",
        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
     )

x <- seq(-0.45, 7.95, by = 1.2)       # x축의 눈금 값들

axis(side = 1,                        # 플롯 영역의 아랫 부분 - x축
     at = x,                          # 눈금을 표시할 x축의 값
     tck = -0.02,                     # 눈금의 길이 (음수 : 아랫 방향)
     pos = 0,                         # 눈금이 표시될 Y축의 값
     col.ticks = "blue",              # X축의 색
     labels = FALSE)                  # 눈금에 라벨을 표시하지 않습니다.

Figure 8.4: 자동차 유형별 평균 고속도로 연비 : X축 눈금

Go Top