为什么 R 中的 ifelse() 在 test 为 FALSE 时应用 function？

Question

从 tibble 中的字符列中，我尝试提取数字并使用ifelse()转换为数字类型以将as.numeric()应用于不包含字母（或“+”）的值。

虽然此示例有效，但它会返回一条警告消息：

library(dplyr)

tibble(a = c("0", "0.1", "abc")) %>% 
  mutate(b = ifelse(!grepl("[a-zA-Z\\+]+", a), as.numeric(a), NA))

# A tibble: 3 × 2
  a         b
  <chr> <dbl>
1 0       0  
2 0.1     0.1
3 abc    NA  
Warning message:
Problem while computing `b = ifelse(grepl("[a-zA-Z\\+]+", a), NA, as.numeric(a))`.
ℹ NAs introduced by coercion 

请帮助我理解为什么我的脚本仍在尝试将字符值转换为数字，以及如何解决此问题。

Answer 1

正如这个密切相关的问题中所解释的： Does ifelse really calculate both its vectors every time? , ifelse （通常）计算每个条目的两个响应，然后将适当的响应放在结果向量中。 因此，即使as.numeric("abc")不在您的结果中，它仍会尝试计算它。

这意味着在这里使用ifelse()可能没有多大意义。 不妨简化为b = as.numeric(a) ，或者如果您想避免警告b = suppressWarnings(as.numeric(a)) 。