R语言按条件替换缺失值：JOB为Student时将HOME_VAL空值设为0

首先我们先复现你提供的原始数据集，方便后续验证：

# 构造原始数据框
DT <- data.frame(
  HOME_VAL = c("$9999", "$100", "", "$2000", "", "$60000", "$40000"),
  JOB = c("Student", "Home Maker", "Student", "Home Maker", "Student", "Student", "Professor"),
  stringsAsFactors = FALSE
)

你原来的if语句没法正确处理所有行——因为if只会判断逻辑向量的第一个元素，不会对每一行做向量化操作。下面是几种正确的实现方式：

方法1：基础R索引替换 #

直接通过逻辑索引定位需要修改的行，然后赋值，简单直观：

# 定位条件：JOB是Student且HOME_VAL为空字符串
DT$HOME_VAL[DT$JOB == "Student" & DT$HOME_VAL == ""] <- "0"

方法2：使用ifelse向量化处理 #

ifelse可以对每个元素逐一进行条件判断和替换，适合这种逐行处理的场景：

DT$HOME_VAL <- ifelse(DT$JOB == "Student" & DT$HOME_VAL == "", "0", DT$HOME_VAL)

方法3：data.table高效处理（如果你习惯用data.table） #

如果你的DT是data.table类型，这种方式在大数据集上会更高效：

library(data.table)
setDT(DT) # 转换为data.table（如果还不是的话）
DT[JOB == "Student" & HOME_VAL == "", HOME_VAL := "0"]

处理后的结果 #

运行任意一种方法后，都会得到你期望的数据集：

HOME_VAL        JOB
1    $9999    Student
2     $100 Home Maker
3        0    Student
4    $2000 Home Maker
5        0    Student
6   $60000    Student
7   $40000  Professor

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