将连续变量转换为R中的离散值（字母数字）。范围是字母数字

我看到类似的后https://stackoverflow.com/questions/6104836/splitting-a-continuous-variable-into-equal-sized-groups。但我的问题在于，范围必须是一个字符串。下面是我的数据帧将连续变量转换为R中的离散值（字母数字）。范围是字母数字

df 
name salary bonus increment(%) 
AK 22200 120 2 
BK 55000 34 .1 
JK 12000 400 3 
VK 3400 350 15 
DK 5699 NA NA 

df = structure(list(name = c("AK", "BK", "JK", "VK", "DK"), salary = c(22200L, 55000L, 12000L, 3400L, 5699L), bonus = c(120L, 34L, 400L, 350L, NA), `increment(%)` = c(2, 0.1, 3, 15, NA)), .Names = c("name", "salary", "bonus", "increment(%)"), row.names = c(NA, -5L), class = "data.frame")

工资列需要与像"< 10K"，"10K-20K"的范围内进行修改，"20K-30K""> 30K"这些值是字母数字未在cut by defined interval

name salary bonus increment(%) 
AK 20K-30K 120 2 
BK >30K  34 .1 
JK 10K-20K 400 3 
VK <10K  350 15 
DK <10K  NA NA

寻址然而，使用后由R定义的时间间隔没有产生所期望的结果切割，下面是代码 df$salary<-cut(df$salary,breaks = c(0,10000,20000,30000,60000),include.lowest = TRUE)

输出是

name  salary bonus increment(%) 
    1 AK (2e+04,3e+04] 120   2.0 
    2 BK (3e+04,6e+04] 34   0.1 
    3 JK (1e+04,2e+04] 400   3.0 
    4 VK  [0,1e+04] 350   15.0 
    5 DK  [0,1e+04] NA   NA

来源

2017-06-24 Anurodh

伙计们这不是一个重复的问题，这里的范围基本上是一个字母数字值。 – Anurodh

可以使用case_when函数从dplyr包。 df2是最终的输出。

library(dplyr) 

df2 <- df %>% 
    mutate(salary = case_when(
    salary < 10000     ~ "<10K", 
    salary >= 10000 & salary < 20000 ~ "10K-20K", 
    salary >= 20000 & salary < 30000 ~ "20K-30K", 
    salary >= 30000     ~ ">30K", 
    TRUE        ~ "NA" 
))

来源

2017-06-24 15:05:00 www

谢谢，case_when似乎很适合这种情况。只是，使用TWIK。在我的工作室 - [R在case_when工资infornt $它抛出一个错误，因为无法找到薪水变量。 – Anurodh

将连续变量转换为R中的离散值（字母数字）。范围是字母数字

回答

相关问题