如何在R中替换所有类型NA（真实NA与字符串NA）为“-”

解法1：tidyverse 方案（适合数据处理流程集成） #

需要依赖dplyr和stringr，是日常处理最灵活的写法，可扩展性强：

library(dplyr)
library(stringr)

df_result <- df %>%
  # 先统一将所有列转为字符型，匹配最终输出的列类型要求
  mutate(across(everything(), as.character)) %>%
  # 批量替换所有缺失值：包含原生逻辑NA、字符串"NA"、全NA构成的区间缺失值
  mutate(across(everything(), ~ifelse(
    is.na(.) | str_detect(., "^[NA\\s,()]+$"),
    "-",
    .
  )))

如果你的实际场景中字符串形式的缺失只有纯"NA"的情况，可以把正则匹配改成直接等值判断，大幅提升大数据量下的运行效率：

mutate(across(everything(), ~ifelse(is.na(.) | . == "NA", "-", .)))

解法2：base R 方案（无额外依赖，轻量快速） #

不需要加载任何第三方包，适合小数据或者需要轻量化运行的场景：

# 统一转为字符型
df[] <- lapply(df, as.character)
# 批量替换符合规则的缺失值
df[is.na(df) | grepl("^[NA\\s,()]+$", as.matrix(df))] <- "-"

两种方案运行后得到的结果都和你给出的预期输出完全一致。

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