R로 배우는 비즈니스 프로세스 분석
Gert Janssenswillen
Creator of bupaR

log %>%
group_by_case() %>%
mutate(total_cost = sum(cost, na.rm = T)
log %>%
group_by_case %>%
mutate(total_cost = sum(cost, na.rm = T) %>%
mutate(impact = case_when(cost <= 1000 ~ "Low",
cost <= 5000 ~ "Medium",
T ~ "High"))
log %>%
group_by_case %>%
mutate(refund_made = any(str_detect(activity, "Pay Claim")))
케이스 정보를 원본 데이터에 추가
활동 정보 추가
log %>%
throughput_time(level = "case", units = "days", append = TRUE)
log %>%
throughput_time(level = "case", units = "days", append = TRUE) %>%
mutate(on_time = processing_time_case <= 7)
R로 배우는 비즈니스 프로세스 분석