그럼 마지막으로 지금까지 배운 다양한 요리 재료를 다루는 방법을 응용하여 요리를 하나 만들어 보겠습니다. 만들 요리는 order_info_r 테이블의 메뉴(item_id)별, 월별 평균 매출을 계산한 후 메뉴별, 월별로 오름차순 정렬해서 출력하는 메뉴 아이템별 월 평균 매출입니다. 기초 요리법에서 익힌 R 기본 함수도 같이 응용해 보겠습니다. 결과는 my_first_cook이란 변수에 담아 출력하겠습니다(잠깐! 독자 여러분도 어떻게 하면 원하는 결과를 얻을 수 있는지 코드를 한 번 고민해 보세요).
my_first_cook <- order_info_r %>% mutate(reserv_month = substr(reserv_no, 1, 6)) %>% group_by(item_id, reserv_month) %>% summarise(avg_sales = mean(sales)) %>% arrange(item_id, reserv_month) my_first_cook # A tibble: 65 x 3 # Groups: item_id [10] item_id reserv_month avg_sales <chr> <chr> <dbl> 1 M0001 201906 48000 2 M0001 201907 68000 3 M0001 201908 56000 4 M0001 201909 66000 5 M0001 201910 92000 6 M0001 201911 68308. 7 M0001 201912 153143. 8 M0002 201906 24000 9 M0002 201907 38000 10 M0002 201908 21600 # ... with 55 more rows