如何在R中根据条件用另一列值替换指定列的值？

下面提供几种适配大数据集的实现方法，可根据你的使用习惯选择：

方法1：Base R 原生实现 #

通过逻辑索引直接定位并替换，代码简洁，处理大数据集效率稳定：

# 定位events列值为"strikeout"的行，用对应description值替换
data$events[data$events == "strikeout"] <- data$description[data$events == "strikeout"]

方法2：dplyr（Tidyverse）实现 #

如果习惯使用tidyverse生态，用mutate配合条件函数的写法更具可读性：

library(dplyr)

data <- data %>%
  mutate(events = if_else(events == "strikeout", description, events))

若后续有多个条件需处理，可改用更灵活的case_when：

data <- data %>%
  mutate(events = case_when(
    events == "strikeout" ~ description,
    TRUE ~ events  # 其他情况保留原events值
  ))

方法3：data.table 实现 #

针对百万级以上的超大数据集，data.table的内存占用和运行效率远优于前两种方法，是最优选择：

library(data.table)

# 转换为data.table格式
setDT(data)
# 按条件直接更新对应列
data[events == "strikeout", events := description]

验证处理结果 #

执行任意方法后，打印数据即可看到替换效果：

print(data)

输出示例：

events       description
1 swinging_strike swinging_strike
2 swinging_strike swinging_strike
3            ball            ball
4    called_strike    called_strike
5    hit_into_play    double_play
6    called_strike    called_strike

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