新進人員的公平薪資

HR 分析：用 R 探索員工資料

Ben Teusch

HR Analytics Consultant

資料

head(pay)

# A tibble: 6 × 5
  employee_id department   salary new_hire job_level
        <dbl> <chr>         <dbl> <chr>    <chr>    
1           1 Sales       103264. No       Salaried 
2           2 Engineering  80709. No       Hourly   
3           4 Engineering  60737. Yes      Hourly   
4           5 Engineering  99116. Yes      Salaried 
5           7 Engineering  51022. No       Hourly   
6           8 Engineering  98400. No       Salaried

chisq.test(survey$in_sales, survey$disengaged)

    Pearson's Chi-squared test with Yates' continuity correction
data:  survey$in_sales and survey$disengaged
X-squared = 25.524, df = 1, p-value = 4.368e-07

chisq.test(survey$in_sales, survey$disengaged) %>%
  tidy()

# A tibble: 1 × 4
  statistic     p.value parameter method                            
      <dbl>       <dbl>     <int> <chr>                             
1      25.5 0.000000437         1 Pearson's Chi-squared test with ...

chisq.test(survey$in_sales, survey$disengaged) %>%
  tidy() %>%
  pull(p.value)

4.368222e-07

一起來練習吧！

HR 分析：用 R 探索員工資料