[R시각화] 조건부 막대그래프 (barchart)

lattice 패키지의 barchart 함수를 이용하면 조건부 막대그래프를 그릴 수 있습니다. 먼저 예시에 사용할 데이터를 하나 만들겠습니다. 세 카페의 음료별 판매량 데이터입니다. 

 

data.xlsx

0.01MB

 

R에서 데이터를 열어봅시다. (경로는 여러분이 파일을 저장한 경로로 넣으셔야 됩니다.)

 

library(readxl)
dt <- read_excel("C:/Users/Desktop/data.xlsx")
dt=as.data.frame(dt)

 

불러온 데이터는 아래와 같습니다.

 

> dt
     coffee volume      name
1 americano    494 starbucks
2     latte    455 starbucks
3  Espresso    476 starbucks
4 americano    461    hollys
5     latte    436    hollys
6  Espresso    144    hollys
7 americano    497     ediya
8     latte    483     ediya
9  Espresso    205     ediya

 

그래프를 그려봅시다.

 

barchart(volume~coffee|name,dt)