R语言多条件新建变量时ifelse、for循环运行异常求助

你的代码运行结果不符合预期/报错，核心是几个低级错误叠加导致的：

• 列名拼写完全错误：你需要判断的三列是AC1.int、AC2.int、AC3.int，但你两段代码里混用了ACN.2、ACN.3、ACN2.int、ACN3.int、ACN1.int等大量不存在的列名，R读取不存在的列会返回全空值，逻辑判断从根源上就是错的。
• 初始值赋值逻辑错误：你写的ACdata$Vehicle <- "NA"是给整列赋值为字符串类型的"NA"，不是R语言里的空值NA，最后用is.na()匹配空值时根本匹配不到这些字符串，自然大量结果不对。
• 判断顺序与优先级不匹配：你的需求里NV规则写在AV规则前，说明NV优先级更高（即同一行同时出现NV和AV时，优先归为Vehicle noise），但你ifelse版本先判断AV再判断NV，虽然顺序歪打正着，但你后续补NA的逻辑完全失效。
• for循环版本额外报错原因：用==做值判断时，如果单元格是空值NA，判断结果会返回NA，if条件遇到NA值会直接终止运行报错；另外R是向量化运算语言，逐行for循环操作数据框效率极低，完全没必要用。

优先用R原生的向量化逻辑判断，不需要写循环，运行快且不容易出错：

基础R版本（无需安装额外包） #

# 整列默认赋值为none
ACdata$Vehicle <- "none"

# 批量判断三列是否包含目标值，自动把判断结果里的NA转为FALSE避免异常
has_av <- with(ACdata, AC1.int == "AV" | AC2.int == "AV" | AC3.int == "AV")
has_av[is.na(has_av)] <- FALSE
has_nv <- with(ACdata, AC1.int == "NV" | AC2.int == "NV" | AC3.int == "NV")
has_nv[is.na(has_nv)] <- FALSE

# 按优先级赋值：先赋AV，再赋NV，保证NV优先级更高会覆盖AV的结果
ACdata$Vehicle[has_av] <- "Vehicle approach"
ACdata$Vehicle[has_nv] <- "Vehicle noise"

dplyr版本（写法更简洁，不易写错） #

如果习惯用tidyverse生态的语法，用if_any可以避免重复写列名，代码可读性更高：

library(dplyr)

ACdata <- ACdata %>%
  mutate(
    Vehicle = case_when(
      # 优先级高的判断写在前面
      if_any(c(AC1.int, AC2.int, AC3.int), ~.x == "NV") ~ "Vehicle noise",
      if_any(c(AC1.int, AC2.int, AC3.int), ~.x == "AV") ~ "Vehicle approach",
      TRUE ~ "none"
    )
  )

如果一定要写for循环，需要修正列名、增加NA判断逻辑，改完可运行但数据量大时速度会非常慢：

ACdata$Vehicle <- "none"
for(i in seq_len(nrow(ACdata))) {
  # 提前把当前行的NA替换为空字符串，避免判断报错
  vals <- c(
    ifelse(is.na(ACdata$AC1.int[i]), "", ACdata$AC1.int[i]),
    ifelse(is.na(ACdata$AC2.int[i]), "", ACdata$AC2.int[i]),
    ifelse(is.na(ACdata$AC3.int[i]), "", ACdata$AC3.int[i])
  )
  if("NV" %in% vals) {
    ACdata$Vehicle[i] <- "Vehicle noise"
  } else if("AV" %in% vals) {
    ACdata$Vehicle[i] <- "Vehicle approach"
  }
}

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