Derivar la antigüedad de la plantilla

En este ejercicio vas a derivar la antigüedad de las personas en la organización, es decir, el tiempo que han trabajado o llevan en la empresa.

Para calcular la diferencia entre dos fechas, puedes usar las funciones interval() y time_length() de lubridate. Ya hemos convertido las columnas de fecha relevantes de texto a formato fecha.

Recuerda que cutoff_date se usa para calcular la tenure de personas Active, mientras que last_working_date se usa para personas Inactive.

Este ejercicio forma parte del curso

Analítica de RR. HH.: Predicción de la rotación de empleados en R

Ver curso

Instrucciones del ejercicio

Deriva la tenure de las personas (en años) usando last_working_date, date_of_joining y cutoff_date.
Genera un diagrama de cajas para visualizar la antigüedad de personas Active e Inactive.

Ejercicio interactivo práctico

Prueba este ejercicio y completa el código de muestra.

# 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()

Editar y ejecutar código