aos*_*ith 25
有一个recode开始可用功能dplyr版本dplyr_0.5.0看起来非常相似,revalue从plyr.
从recode文档示例部分构建的示例:
set.seed(16)
x = sample(c("a", "b", "c"), 10, replace = TRUE)
x
[1] "a" "b" "a" "b" "b" "a" "c" "c" "c" "a"
recode(x, a = "Apple", b = "Bear", c = "Car")
[1] "Car" "Apple" "Bear" "Apple" "Car" "Apple" "Apple" "Car" "Car" "Apple"
Run Code Online (Sandbox Code Playgroud)
如果您只定义了一些要重新编码的值,则默认情况下会填充其余值NA.
recode(x, a = "Apple", c = "Car")
[1] "Car" "Apple" NA "Apple" "Car" "Apple" "Apple" "Car" "Car" "Apple"
Run Code Online (Sandbox Code Playgroud)
可以使用.default参数更改此行为.
recode(x, a = "Apple", c = "Car", .default = x)
[1] "Car" "Apple" "b" "Apple" "Car" "Apple" "Apple" "Car" "Car" "Apple"
Run Code Online (Sandbox Code Playgroud)
.missing如果您想用其他东西替换缺失值,还有一个参数.
我们可以用chartrfrom来做到这一点base R
chartr("ac", "AC", x)
Run Code Online (Sandbox Code Playgroud)
x <- c("a", "b", "c")
Run Code Online (Sandbox Code Playgroud)