직원 근속 기간 계산하기
이 연습 문제에서는 조직 내 직원의 근속 기간, 즉 직원이 조직에서 근무했거나 현재 재직 중인 기간을 계산해 보겠습니다.
두 날짜 사이의 시간 차이를 구하려면 lubridate의 interval()과 time_length() 함수를 사용할 수 있어요. 관련 날짜 열은 이미 문자형에서 날짜 형식으로 변환해 두었습니다.
Active 직원의 tenure는 cutoff_date를 사용해 계산하고, Inactive 직원은 last_working_date를 사용한다는 점을 기억하세요.
이 연습은 강의의 일부입니다
HR Analytics: R로 직원 이탈 예측하기
연습 안내
last_working_date,date_of_joining,cutoff_date를 사용해 직원의tenure(년 단위)를 계산하세요.Active와Inactive직원의 근속 기간을 시각화하는 박스 플롯을 생성하세요.
실습형 인터랙티브 연습
이 예제를 이 샘플 코드를 완성하여 풀어보세요.
# Add tenure
emp_tenure <- emp_jhi %>%
mutate(tenure = ifelse(status == "Active",
time_length(interval(date_of_joining, ___),
"years"),
___(___(date_of_joining, ___),
"years")))
# Compare tenure of active and inactive employees
ggplot(emp_tenure, aes(x = ___, y = ___)) +
geom_boxplot()