如何在R中为数据框添加多列并以单一值初始化

下面是几种高效且简洁的实现方式，适用于不同使用场景：

1. Base R 原生方法（无需额外包） #

这是最轻量化的实现方式，一行代码即可完成批量添加：

# 定义需要添加的新列名向量
new_cols <- c("col_a", "col_b", "col_c")

# 批量添加初始值为NA的列
df[new_cols] <- NA

如果担心覆盖数据框中已有的列，可以先筛选出不存在的列名：

new_cols <- setdiff(new_cols, names(df))
df[new_cols] <- NA

2. dplyr/tidyverse 方法 #

若你习惯使用tidyverse生态，mutate()配合across()可以清晰实现需求：

library(dplyr)

new_cols <- c("col_a", "col_b", "col_c")

df <- df %>%
  mutate(across(all_of(new_cols), ~NA))

同样，要避免覆盖已有列的话，可先过滤列名：

df <- df %>%
  mutate(across(all_of(setdiff(new_cols, names(.))), ~NA))

扩展：修改初始值 #

如果需要将初始值替换为其他内容（比如0、空字符串），只需把代码中的NA换成对应值即可，示例：

# Base R 初始化为0
df[new_cols] <- 0

# dplyr 初始化为空字符串
df <- df %>%
  mutate(across(all_of(new_cols), ~""))

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