成本与紧急程度
我们刚创建的数据集 vacancies_impact 包含每个案例的 total_cost 和 cost_impact，同时还包含数据属性 urgency，用于指示职位是否紧急（urgency == 10）或不紧急（urgency == 1）。请使用 dplyr 的 case_when() 创建变量 cost_profile，用于指示成本投入是否合理：
- 若 cost_impact == High 且紧急程度小于 7，标记为 Disproportionate（不成比例）
- 若 cost_impact == Medium 且紧急程度小于 5，标记为 Excessive（过高）
- 若 cost_impact == Low 且紧急程度大于 6，标记为 Lacking（不足）
- 其他情况标记为 Appropriate（合适）
本练习是课程的一部分
R 中的业务流程分析
交互式实操练习
通过完成这段示例代码来试试这个练习。
# Create cost_profile
vacancies_profile <- vacancies_impact %>%
mutate(
cost_profile = case_when(
cost_impact == "High" & urgency < 7 ~ "Disproportionate",
___
___
TRUE ~ "Appropriate"
)
)