더북(TheBook)

고객 번호별로 방문 횟수(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
신간 소식 구독하기
뉴스레터에 가입하시고 이메일로 신간 소식을 받아 보세요.