R语言for循环报missing value where TRUE/FALSE needed错误排查

R的if()判断仅能接收明确的TRUE/FALSE布尔值作为输入，一旦判断表达式返回缺失值NA，就会抛出你看到的missing value where TRUE/FALSE needed错误。你的代码触发该问题的核心原因有两个：

• 逻辑索引写错：循环内你每次仅对单个元素txt[i]执行grepl匹配，此时生成的bool是长度为1的单个逻辑值，并非和txt等长的逻辑向量。当循环计数i大于1时，写bool[i]相当于索引长度为1的向量的第i个不存在的位置，R会直接返回NA，最终让整个判断条件变成NA，触发报错。
• 未做缺失值兜底：如果txt中本身存储了NA值，nchar(NA)、对NA执行正则匹配的返回结果都是NA，同样会导致判断条件出现缺失值。

result <- list()
txt <- premade_txt[[1]]

# 用seq_along遍历比1:length更稳妥，可避免txt为空时生成无效索引
for (i in seq_along(txt)) {
  # 提前跳过NA元素
  if (is.na(txt[i])) next
  is_all_english <- grepl("^[A-Za-z]+$", txt[i], perl = TRUE)
  # 单值判断用&&做短路运算，直接取判断结果无需额外索引
  if (nchar(txt[i]) == 3 && is_all_english) {
    result <- append(result, txt[i])
  }
}

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