각 메뉴 아이템에 대해 월별로 평균 매출이 계산되어 오름차순으로 정렬하여 출력되었습니다. 코드를 풀이하면 다음 표와 같습니다.
표 7-5 | 메뉴 아이템별 월 평균 매출 코드 풀이
|
코드 |
설명 |
|
① order_info_r %>% |
order_info_r 테이블을 선택해서 데이터를 전달하고 |
|
② substr(reserv_no, 1, 6) |
reserv_no 값을 첫 번째부터 여섯 번째까지 선택해서(년 월이 됨) |
|
③ mutate(reserv_month = substr(reserv_no, 1, 6)) %>% |
reserv_month라는 열을 생성하며 |
|
④ group_by(item_id, reserv_month) %>% |
메뉴 아이템과 년 월로 그룹화해서 |
|
⑤ summarise(avg_sales = mean(sales)) %>% |
매출 평균을 요약하여 avg_sales라는 열에 담아 |
|
⑥ arrange(item_id, reserv_month) |
메뉴 이름과 년 월 빠르기 순으로 오름차순 출력 |
코드가 길어져 가독성이 좋지 않다면 앞의 풀이 과정처럼 파이프 연산자를 기준으로 Enter를 눌러 줄을 바꾸어 코드를 입력하는 것도 가독성을 높일 수 있는 좋은 방법입니다(해당 my_first_cook 코드는 8장 UNIT 09에서 다시 사용합니다).
어떤가요? 여러분의 첫 요리를 잘 만들었나요? 그렇다면 다행입니다. 하지만 생각만큼 잘되지 않았어도 괜찮습니다. 처음부터 잘할 수는 없죠. 포기하지 않고 계속 연습하다 보면 언젠가는 훌륭한 요리를 만들 수 있을 것입니다.