如何在R的数据框中将多个值定义为缺失?

考虑一个数据帧,其中两个值“888”和“999”代表丢失的数据:

df <- data.frame(age=c(50,30,27,888),insomnia=c("yes","no","no",999))
df[df==888] <- NA
df[df==999] <- NA

此解决方案每个值用一行代码表示丢失的数据。对于表示缺失数据的值数量很多的情况,您是否有一个更简单的解决方案?

最佳答案

这是三个解决方案:

# 1. Data set
df <- data.frame(
  age = c(50, 30, 27, 888),
  insomnia = c("yes", "no", "no", 999))

# 2. Solution based on "one line of code per missing data value"
df[df == 888] <- NA
df[df == 999] <- NA
is.na(df)

# 3. Solution based on "applying function to each column of data set"
df[sapply(df, function(x) as.character(x) %in% c("888", "999") )] <- NA
is.na(df)

# 4. Solution based on "dplyr"

# 4.1. Load package
library(dplyr)

# 4.2. Define function for missing values
is_na <- function(x){
 return(as.character(x) %in% c("888", "999"))
}

# 4.3. Apply function to each column
df %>% lapply(is_na)

关于r - 定义多个值在数据框中丢失,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/47496228/

10-11 14:14
查看更多