薪酬

HR 分析：以 R 預測員工流失

Abhishek Trehan

People Analytics Practitioner

薪酬很重要

探索薪酬變數

# Plot the distribution of compensation
ggplot(emp_tenure, aes(x = compensation)) + 
  geom_histogram()

探索薪酬變數

# Plot the distribution of compensation across levels
ggplot(emp_tenure, 
       aes(x = level, y = compensation)) + 
  geom_boxplot()

推導 Compa-ratio（薪酬比）

$$ \text{Compa Ratio} = \frac{\text{ Actual Compensation }}{\text{Median Compensation}} $$

推導 Compa-ratio（薪酬比）

Compa-ratio 為 1.2（120%）代表該員工薪酬高於中位數 20%
Compa-ratio 為 1（100%）代表該員工薪酬等同中位數
Compa-ratio 為 0.8（80%）代表該員工薪酬低於中位數 20%

推導薪酬中位數與 Compa-ratio

# Derive Compa-ratio
emp_compa_ratio <- emp_tenure %>%  
  group_by(level) %>%   
  mutate(median_compensation = median(compensation), 
         compa_ratio = (compensation / median_compensation))

# Look at the median compensation for each level        
emp_compa_ratio %>% 
  distinct(level, median_compensation)

# A tibble: 2 x 2
# Groups:     level[2]
  level      median_compensation
  <fct>                    <dbl>
1 Analyst                  51840
2 Specialist               83496

推導 Compa-level（薪酬層級）

Compa-ratio > 1：高於
否則：低於

一起來練習吧！

HR 分析：以 R 預測員工流失