Actividad 2 - Rotación

Hipótesis de rotación laboral

1.Rotación por estado civil

La variable de estado civil puede tener relación con la rotación. Posiblemente, presentan alta rotación los solteros, al presentárseles nuevas oportunidades laborales, fácilmente la pueden aceptar, ya que no están sujetos a las obligaciones derivadas del matrimonio, esto teniendo en cuenta, que tampoco tienen personas que dependan económicamente de ellos, por ejemplo, hijos, padres en su vejes entre otras.

2. Rotación por viaje de negocios

La variable de viaje de negocios puede tener relación con la rotación. Es posible que, a mayor frecuencia de viajes laborales un empleado puede sentir agotamiento en su labor, ya que el desplazamiento le agota físicamente. Además de esto, tiene que estar alejado mucho tiempo de su familia. Por lo anterior, el empleado busca una oportunidad laboral donde no tenga que hacer viajes de negocios para ejercer su labor.

3. Rotación por departamento

La variable de departamento puede tener relación con la rotación. Ya que pueden existir departamentos en la empresa, que presenten alta rotación por el tipo de trabajo que desempeñan. En caso de las ventas, el pago puede ser por comisión, y al no vender no genera ningún ingreso. Por tal razón, el empleado busca otra oportunidad laboral donde el departamento de ventas, por lo menos le pague un salario de base.

4. Rotación por porcentaje de aumento salarial.

La variable de porcentaje de aumento salarial puede tener relación con la rotación. Probablemente, un bajo porcentaje de incremento salarial, hace que los empleados opten por otras oportunidades laborales con salarios más competitivos.

5. Rotación por años a cargo con el mismo jefe.

La variable de años a cargo con el mismo jefe puede tener relación con la rotación. Es posible que, la capacidad de gestión de algunos jefes se quede corta, para logar bienestar de sus empleados. Además de esto, algunos jefes en su forma de liderar son muy autoritarios, lo que hace que los empleados busquen otros empleos. Por lo anterior los empleados con menos años con el mismo jefe tienden a tener mayor rotación.

6. Rotación por años de experiencia.

La variable de años de experiencia puede tener relación con la rotación. Es probable que, al tener menos años de experiencia la rotación sea mayor, ya que los empleados con menor experiencia buscan más oportunidades para crecer profesionalmente y llegar a lo que desean en su vacación como profesionales.

Pregunta 2

Realizar un análisis univariado (caracterización). Nota: Los indicadores o gráficos se usan dependiendo del tipo de variable (cuanti o cuali). Incluir interpretaciones de la rotación.

require(ggplot2)
require(ggpubr)
library(forcats)
gR=ggplot(Datos,aes(x=Rotación))+geom_bar(fill="#c92853")+theme_bw()+theme(axis.text.x = element_text(angle = 90))
Rota=ggarrange(gR, size=2)
Rota

round(prop.table(table(Datos$Rotación))*100,digits = 0)

## 
## No Si 
## 84 16

En general, los datos muestran que, la rotación voluntaria de empleados se representa en un 16 por ciento del total.

require(ggplot2)
require(ggpubr)
library(forcats)

g1=ggplot(Datos,aes(x=`Viaje de Negocios`))+geom_bar(fill="#b5b5b3")+theme_bw()+theme(axis.text.x = element_text(angle = 90))
g2=ggplot(Datos,aes(x=Departamento))+geom_bar(fill="#1fd184")+theme_bw()
g3=ggplot(Datos,aes(y=Años_acargo_con_mismo_jefe))+geom_bar(stat="count",fill="#f68060",alpha=.6,width=.4) +coord_flip()+theme_bw()           
g4=ggplot(Datos,aes(x=Años_Experiencia))+geom_bar(fill="#1fbfd1")+theme_bw()+theme(axis.text.x = element_text(angle = 90))
g5=ggplot(Datos,aes(x=Estado_Civil))+geom_bar(fill="#cd42f0")+theme_bw()
g6=ggplot(Datos,aes(x=Porcentaje_aumento_salarial))+geom_bar(fill="#f0ba32")+theme_bw()

graf=ggarrange(g1, g2, g3, g4, g5, g6,labels = c("A", "B","C","D","E","F"), ncol = 3, nrow = 2)
graf

Pregunta 3

Realizar un análisis bivariado (siempre contra la rotación). Nota: Los indicadores y gráficos se usan dependiendo del tipo de variable (cuanti VS cuali, cuali VS cuali). Comparar los resultados con la hipótesis planteada inicialmente y determinar si los datos apoyan o no la hipótesis.

require(CGPfunctions)
gb1=PlotXTabs2(Datos,Estado_Civil,Rotación, plottype = "percent" )
Grafica_Estado_Civil=ggarrange(gb1,labels = c("1A"))
Grafica_Estado_Civil

En la gráfica 1A, la hipótesis 1 se comprueba, ya que los empleados solteros rotan más que los casados o divorciados, en un 26 por ciento.

gb2=PlotXTabs2(Datos,`Viaje de Negocios`,Rotación, plottype = "percent" )
Gráfica_Viaje_de_Negocios=ggarrange(gb2,labels = c("1B"))
Gráfica_Viaje_de_Negocios

En la gráfica 1B, la hipótesis 2 se comprueba, ya que los empleados que viajan frecuentemente son las que más rotan, en un 25 por ciento

gb3=PlotXTabs2(Datos,Departamento,  Rotación, plottype = "percent" )
Gráfica_Departamento=ggarrange(gb3,labels = c("1C"))
Gráfica_Departamento

En la gráfica 1C, la hipótesis 3 se comprueba, ya que los empleados en el departamento de ventas son las que más rotan, en un 21 por ciento. Ahora aquí se debe verificar el motivo de la rotación, puede ser, porque viajan demasiado o comisionan muy poco.

gb4=PlotXTabs2(Datos,Porcentaje_aumento_salarial,Rotación, plottype = "percent" )
Gráfica_Porcentaje_aumento_salarial=ggarrange(gb4,labels = c("1D"))
Gráfica_Porcentaje_aumento_salarial

En la gráfica 1D, la hipótesis 4 no es comprobada, ya que los empleados con un porcentaje de aumento salarial menor, no rotan más que los que reciben un mayor porcentaje salarial. Por tal razón, no es un factor determinante la rotación para los empleados con menor porcentaje de incremento salarial, ya que se puede ver en la gráfica 1D empleados con porcentaje de incremento entre 22% y 24% con igual o mayor porcentaje de rotación que los que apenas le incrementan 11% en su salario.

gb5=PlotXTabs2(Datos,Años_acargo_con_mismo_jefe,Rotación, plottype = "percent" )+theme(axis.text.x = element_text(angle = 90))
Gráfica_Años_acargo_con_mismo_jefe=ggarrange(gb5,labels = c("1E"))
Gráfica_Años_acargo_con_mismo_jefe

En la gráfica 1E, la hipótesis 5 no es comprobada, ya que los empleados con menos años con el mismo jefe, no rotan más que los empleados con más años con el mismo jefe. Por tal razón, no es un factor determinante la rotación para los empleados con menos años con el mismo jefe, ya que se puede ver en la gráfica 1E empleados con 14 años con el mismo jefe con la rotación más alta en 40%.

gb6=ggplot(Datos,aes(x=Rotación, y=Años_Experiencia, fill=Rotación))+geom_boxplot()+theme_bw()
Gráfica_Años_Experiencia=ggarrange(gb6,labels = c("1F"))
Gráfica_Años_Experiencia

En la gráfica 1F, la hipótesis 6 se comprueba, ya que los empleados con menos años de experiencia rotan más que los empleados con más años de experiencia. Según la grafica 1F se muestra que el rango de 3 a 10 años de experiencia son los que presentan mayor rotación.

Pregunta 4

En las conclusiones se discute sobre cual seria la estrategia para disminuir la rotación en la empresa. Ejemplo: Mejorar el ambiente laboral, los incentivos económicos, distribuir la carga de horas extra (menos turnos y mas personal).