# 누적 막대 그래프 그리기
ggplot(df_branch_sales, aes(x = "", y = sales_amt, fill = product_name)) +
    facet_grid(facets = . ~ branch) + # 면 분할 함수 branch 기준으로 분할
    geom_bar(stat = "identity")

* ‘. ~’ 기준이 되는 방법으로, 다양한 형태가 있다는 정도만 알아 둡니다.