如何对r中的所有列使用ifelse函数？

Question

以下代码适用于 1 列（列名）。 我想对所有列使用这个函数。 如何为所有列编写以下代码？

data <- data %>% 
mutate(colname = ifelse(colname == "NA",NA,colname)) %>%
filter(!is.na(colname))

Answer 1

我认为您可以使用rowSums来选择其中没有"NA"行。

data <- data[rowSums(data == 'NA', na.rm = TRUE) == 0, ]

在dplyr使用if_all -

data <- data %>% filter(if_all(.fns = ~. != 'NA'))

Answer 2

我们可以使用base R

subset(data, !rowSums(data == 'NA', na.rm = TRUE))