my_first_cook 변수는 메뉴 아이템별 월 평균 매출을 담은 데이터입니다. 이것을 월별로 메뉴 아이템별 선 그래프로 그려 보겠습니다. 각 선 그래프는 자동 채움 Paired 팔레트 색상으로 표현할 것입니다. 그리고 x축에는 ‘월’, y축에는 ‘매출’, 타이틀은 ‘메뉴 아이템별 월 평균 매출 추이’라고 제목(레이블)을 달겠습니다(독자 여러분도 어떻게 하면 원하는 결과를 얻을 수 있을지 고민해 보세요).
ggplot(my_first_cook, aes(x = reserv_month, y = avg_sales, group = item_id, color = item_id)) + geom_line(size = 1) + geom_point(color = "darkorange", size = 1.5) + scale_color_brewer(palette = "Paired") + labs(title = "메뉴 아이템별 월 평균 매출 추이", x = "월", y = "매출")
* 선 그래프 그룹 기준은 item_id
* 자동 색상 기준은 item_id
* 선 그래프이기 때문에 scale_fill_brewer()가 아닌 scale_color_brewer() 함수를 사용합니다.
코드를 실행하면 다음과 같이 그래프가 그려집니다.
그림 8-31 | 메뉴 아이템별 월 평균 매출 추이 선 그래프