고객 번호별로 방문 횟수(F)와 매출(M)을 정리해 보겠습니다.

    # 고객 번호별 방문 횟수(F)와 매출(M) 정리
    df_rfm_data <- df_rfm_join_1 %>%
        group_by(customer_id) %>%
        summarise(visit_sum = n_distinct(reserv_no), sales_sum = sum(sales) / 1000) %>%
        arrange(customer_id)
    
    df_rfm_data     # 데이터 확인
    
    # A tibble: 170 x 3
        customer_id  visit_sum  sales_sum
        <chr>        <int>          <dbl>
     1  W1327595     2                188
     2  W1327803     2                210
     3  W1328432     3                246
     4  W1328505     5                287
     5  W1328786     1                 10
     6  W1328985     2                178
     7  W1328993     1                140
     8  W1329560     1                 24
     9  W1329954     1                 48
    10  W1329962     2                 48
    # ... with 160 more rows
    
    df_rfm_data     # 데이터 확인
    # A tibble: 170 x 3
        customer_id  visit_sum  sales_sum
        <chr>        <int>          <dbl>
     1  W1327595     2                188
     2  W1327803     2                210
     3  W1328432     3                246
     4  W1328505     5                287
     5  W1328786     1                 10
     6  W1328985     2                178
     7  W1328993     1                140
     8  W1329560     1                 24
     9  W1329954     1                 48
    10  W1329962     2                 48
    # ... with 160 more rows
    신간 소식 구독하기
    뉴스레터에 가입하시고 이메일로 신간 소식을 받아 보세요.