在R语言中重编码数据：非空单元格设为Y，空单元格设为N

问题说明 #

需将表格单元格按规则重编码：非空单元格显示为"Y"，空值/空白单元格显示为"N"。

现有代码的问题 #

你当前使用的recode()仅能匹配特定字符串（如空格" "和"If populated"），无法覆盖所有非空场景，适用性极低。

可行解决方法 #

单列处理 #

方法1：if_else结合缺失值与空白判断

适用于空值包含NA或仅含空格的字符串的场景：

library(dplyr)
library(stringr)

df <- df %>%
  mutate(column1 = if_else(is.na(column1) | str_trim(column1) == "", "N", "Y"))

方法2：case_when逻辑拆分

逻辑更直观，便于后续扩展规则：

library(dplyr)
library(stringr)

df <- df %>%
  mutate(column1 = case_when(
    is.na(column1) | str_trim(column1) == "" ~ "N",
    TRUE ~ "Y"
  ))

多列批量处理 #

如果需要一次性处理多列，推荐使用across()（dplyr 1.0.0及以上版本支持）：

library(dplyr)
library(stringr)

# 处理指定列（示例：column1、column2、column3）
df <- df %>%
  mutate(across(c(column1, column2, column3), ~if_else(is.na(.) | str_trim(.) == "", "N", "Y")))

# 处理所有列
df <- df %>%
  mutate(across(everything(), ~if_else(is.na(.) | str_trim(.) == "", "N", "Y")))

补充说明 #

• str_trim()用于清除字符串两端的空格，避免将仅含空格的单元格误判为非空
• 如果你的空值仅为NA，可简化判断逻辑：if_else(is.na(column1), "N", "Y")

内容的提问来源于stack exchange，提问作者Cole