HR Analytics: การวิเคราะห์ข้อมูลพนักงานด้วย R
Ben Teusch
HR Analytics Consultant


names(recruitment)
"attrition" "performance_rating" "sales_quota_pct"
"recruiting_source"
$$\text{อัตราการลาออก} = \frac{\text{การลาออก}}{\text{จำนวนพนักงาน}}$$
หากกำหนดให้ $\text{การลาออก} = 1$ เมื่อพนักงานลาออก สามารถเขียนใหม่ได้เป็น:
$$\text{อัตราการลาออก} = mean(\text{การลาออก})$$
library(dplyr)
recruitment %>%
group_by(recruiting_source) %>%
summarize(highest_performance = max(performance_rating)) %>%
arrange(highest_performance)
# A tibble: 5 × 2
recruiting_source highest_performance
<chr> <dbl>
1 Search Firm 3
2 Referral 4
3 Applied Online 5
4 Campus 5
5 <NA> 5
recruitment %>%
count(recruiting_source)
# A tibble: 5 × 2
recruiting_source n
<chr> <int>
1 Applied Online 130
2 Campus 56
3 Referral 45
4 Search Firm 10
5 <NA> 205
HR Analytics: การวิเคราะห์ข้อมูลพนักงานด้วย R