拥有一个数据框，我该如何替换所有行和列中的所有特定值。例如，我想用NA's 替换所有空记录（不输入位置）：
df <- data.frame(list(A=c("", "xyz", "jkl"), B=c(12, "", 100)))
A B
1 12
2 xyz
3 jkl 100
预期结果：
A B
1 NA 12
2 xyz NA
3 jkl 100
【问题讨论】：
这里有几个dplyr 选项：
library(dplyr)
# all columns:
df %>%
mutate_all(~na_if(., ''))
# specific column types:
df %>%
mutate_if(is.factor, ~na_if(., ''))
# specific columns:
df %>%
mutate_at(vars(A, B), ~na_if(., ''))
# or:
df %>%
mutate(A = replace(A, A == '', NA))
# replace can be used if you want something other than NA:
df %>%
mutate(A = as.character(A)) %>%
mutate(A = replace(A, A == '', 'used to be empty'))
【讨论】：
如果您想替换数据框中的多个值，循环遍历所有列可能会有所帮助。
说要替换""和100：
na_codes <- c(100, "")
for (i in seq_along(df)) {
df[[i]][df[[i]] %in% na_codes] <- NA
}
【讨论】：
我们可以使用 data.table 快速获取。 首先创建没有因子的df，
df <- data.frame(list(A=c("","xyz","jkl"), B=c(12,"",100)), stringsAsFactors=F)
现在你可以使用
setDT(df)
for (jj in 1:ncol(df)) set(df, i = which(df[[jj]]==""), j = jj, v = NA)
您可以将其转换回 data.frame
setDF(df)
如果您只想使用 data.frame 并保留因子比较困难，则需要使用
levels(df$value)[levels(df$value)==""] <- NA
其中 value 是每列的名称。您需要将其插入循环中。
【讨论】：
由于 PikkuKatja 和 glallen 要求提供更通用的解决方案，我还不能发表评论，所以我会写一个答案。您可以组合语句，如下所示：
> df[df=="" | df==12] <- NA
> df
A B
1 <NA> <NA>
2 xyz <NA>
3 jkl 100
对于因子，zxzak 的代码已经产生了因子：
> df <- data.frame(list(A=c("","xyz","jkl"), B=c(12,"",100)))
> str(df)
'data.frame': 3 obs. of 2 variables:
$ A: Factor w/ 3 levels "","jkl","xyz": 1 3 2
$ B: Factor w/ 3 levels "","100","12": 3 1 2
如果遇到麻烦，我建议暂时放弃这些因素。
df[] <- lapply(df, as.character)
【讨论】：
像这样：
> df[df==""]<-NA
> df
A B
1 <NA> 12
2 xyz <NA>
3 jkl 100
【讨论】：
df[df=="xyz"]<-"abc" 将出现“无效因子水平”错误。有没有更通用的解决方案？