从r中的序数数据中创建虚拟变量

Question

我有一个序数变量，以下类别

非常有利（1） 有点有利（2） 有点不利（3） 非常不利（4） 不知道（8） 拒绝回答（9）

我想要我的输出二进制可显示的变量：

有利（1） 不利（0）

我想通过将“非常有利的”和“有利”组合在一起，以编码为“ 1”的新“有利”结果 还将“非常不利”和“有点有利”组合在一起，对新结果“不利”编码为“ 0”。

，我基本上想将“ 1” =“ 1”和“ 2” =“ 1” then，然后3“ =“ 0”和“ 4” =“ 0”

Answer 1

这是dplyr带有case_when（）的解决方案，对于创建假人确实很有用。

我的启动数据如下：

  # A tibble: 6 x 2
      participant category              
            <int> <chr>                 
    1           1 somewhat favorable (2)
    2           2 very unfavorable (4)  
    3           3 very favorable (1)    
    4           4 don't know (8)        
    5           5 very favorable (1)    
    6           6 somewhat favorable (2)

因此，基本上，当它检测到1或2时，它会将行值转换为“有利（1）”，而3或4则将“不利（0）”转换

data %>%  
  mutate(category = case_when(
    str_detect(category, "(1)|(2)") ~ "favorable (1)", 
    str_detect(category, "(3)|(4)") ~ "unfavorable (0)"))

为（8）和（9） s未指定，代码将其返回为NAS。
最终数据集如下：

# A tibble: 10 x 2
   participant category       
         <int> <chr>          
 1           1 favorable (1)  
 2           2 unfavorable (0)
 3           3 favorable (1)  
 4           4 NA             
 5           5 favorable (1)  
 6           6 favorable (1)  
 7           7 unfavorable (0)
 8           8 unfavorable (0)
 9           9 favorable (1)  
10          10 unfavorable (0)

Answer 2

我能想到的最简单的方法是多种方法是利用百分比的百分比。

例如，在基本r中：

data$column_to_recode = as.character(data$column_to_recode) #failing to do this may result in R coercing existing factors to numeric integers representing ranks
data$column_to_recode[which(data$column_to_recode %in% c(1,2))] = 1
data$column_to_recode[which(data$column_to_recode %in% c(3,4))] = 0
data$column_to_recode[which(!(data$column_to_recode %in% c(0:4)))] = NA #or whatever else you want to do with the values that aren't 1 through 4`

那么，如果您真的想要奖金点，则可以将其重新归因于一个因素变量，但我发现这通常过于过多。

data$column_to_recode = factor(data$column_to_recode,levels=c(0,1),ordered = TRUE)

我无法从您的原始问题中分辨出数字代码是否正常，或者您是否想使用字符字符串，但是适用相同的逻辑，例如：

data$column_to_recode[which(data$column_to_recode %in% c("(1) somewhat favorable","(2) somewhat unfavorable"))] = "Favorable"

应该为您提供所需的东西。