6 가로 막대 그래프 그리기
이번에는 세로 막대 그래프를 가로 막대 그래프로 변환해서 그려 보겠습니다.
# 가로 막대 그래프 그리기 gg <- ggplot(df_branch_sales_2, aes(x = reorder(branch, -amt), y = amt, fill = branch)) + geom_bar(stat = "identity") + xlim(c("서초", "용산", "종로", "영등포", "강남"))-----가로 막대를 그릴 때 보기 좋게 하려고 표현 순서를 바꿉니다. # x축과 y축을 바꿈 gg <- gg + coord_flip() gg
코드를 실행하면 다음 그림과 같은 그래프가 그려집니다.
그림 8-12 | 가로로 그려진 막대 그래프
coord_flip() 함수를 사용해서 x축과 y축을 바꾸어 막대 그래프를 그렸습니다.