使用car重新编码变量 - 意外变量(.x值)视为NA

时间:2017-01-03 15:19:54

标签: r data-manipulation dataformat r-car recode

我的目标是将我的变量重新编码为另一个具有反转值的变量:

f1_1_recAktuell <- recode(Dat_MonatAktuell$f1_1, "1=10; 2=9; 3=8; 4=7; 5=6; 6=5; 7=4; 8=3; 9=2; 10=1") 

这段代码已经让我知道了一年多,但突然之间我收到了这条错误消息:

  

警告消息:被视为NA为.x的未替换值不兼容。请详细说明替换或提供.default

我猜数据有问题,但我找不到什么。变量的类是integer,它没有缺失值。

有谁知道我能做什么?

提前致谢!

1 个答案:

答案 0 :(得分:0)

警告消息是由于使用recode dplyr(可能OP加载了包?)而不是car。当dplyr::recode屏蔽car中的相同功能时会发生这种情况。我们可以在函数之前指定包名称作为补救措施,即car::recode

v1 <- 1:10
car::recode(v1, "1=10; 2=9; 3=8; 4=7; 5=6; 6=5; 7=4; 8=3; 9=2; 10=1") 
#[1] 10  9  8  7  6  5  4  3  2  1

另外,我们可以使用

11-v1 
#[1] 10  9  8  7  6  5  4  3  2  1

可以使用dplyr::recode

复制警告
 dplyr::recode(v1, "1=10; 2=9; 3=8; 4=7; 5=6; 6=5; 7=4; 8=3; 9=2; 10=1") 
 #[1] "1=10; 2=9; 3=8; 4=7; 5=6; 6=5; 7=4; 8=3; 9=2; 10=1" NA                                                  
 #[3] NA                                                   NA                                                  
 #[5] NA                                                   NA                                                  
 #[7] NA                                                   NA                                                  
 #[9] NA                                                   NA                                                  
Warning message:
 Unreplaced values treated as NA as .x is not compatible.
  Please specify replacements exhaustively or supply .default

要获得预期的输出,我们也可以这样使用dplyr::recode

dplyr::recode(v1, `1` = 10, `2` = 9, `3` = 8, `4` = 7, 
                 `5` = 6, `6` = 5, `7`=4, `8` = 3, `9` = 2, `10` = 1)
#[1] 10  9  8  7  6  5  4  3  2  1