더북(TheBook)

3 월별 매출 선 그래프 그리기

앞의 선 그래프만으로도 알 수 있는 정보가 있지만, 좀 더 정확하게 파악하고자 월별 매출을 선 그래프로 그려 보겠습니다.

# 예약 번호(reserv_no) 1~6번째 자리를 선택해서(월로 만듦) 그룹핑
total_amt <- order_info_r %>%
    mutate(month = substr(reserv_no, 1, 6)) %>%
    group_by(month) %>%
    summarise(amt_monthly = sum(sales/1000))

total_amt     # 데이터셋 확인

 

코드를 실행하면 다음과 같습니다.

# A tibble: 7 x 2
   month   amt_monthly
   <chr>         <dbl>
1  201906          613
2  201907         1744
3  201908         1622
4  201909         1586
5  201910         3333
6  201911         5197
7  201912         10862
신간 소식 구독하기
뉴스레터에 가입하시고 이메일로 신간 소식을 받아 보세요.