일일 운행 건수 패싯팅

요일별로 패싯팅한 일일 운행 건수를 살펴봤을 때 흥미로운 패턴이 보였습니다. 변수를 더 추가해 패싯팅하면 새로운 인사이트가 있는지 확인해 보겠습니다. 여기서는 현금과 신용카드 결제 유형을 함께 고려할 때 요일 패턴이 달라지는지 살펴봅니다.

작업 공간에는 tx가 준비되어 있습니다.

현금과 신용카드 거래만 필터링한 후, dplyr을 사용해 pickup_date, pickup_dow, payment_type로 그룹화하여 요일과 결제 유형별 집계를 만드세요.
summarise() 안에서 운행 건수를 세고, 결과를 새 변수 n_rides에 할당하세요.
요약 결과인 daily_count 데이터셋을 ggplot() 입력으로 사용하고, geom_point()로 pickup_date를 x축, n_rides를 y축에 두어 시각화하세요.
facet_grid()로 패싯팅을 하되, 행은 payment_type, 열은 요일 pickup_dow로 설정하세요.
coord_fixed() 코드는 결과 플롯의 종횡비를 고정해 패턴을 더 잘 드러나게 합니다.