我从 SAS 来到 R,其中数字缺失设置为无穷大。所以我们只能说:
positiveA = A > 0;
在 R 中,我必须像以下内容一样冗长:
positiveA <- ifelse(is.na(A),0, ifelse(A > 0, 1, 0))
我发现这种语法很难阅读。无论如何我可以修改 ifelse 函数以将 NA 视为一个特殊值,该值对于所有比较条件始终为假?如果没有,将 NA 视为 -Inf 也可以。
同样,在字符变量的 ifelse 语句中将 NA 设置为 ''(空白)。
谢谢。
最佳答案
此语法更易于阅读:
x <- c(NA, 1, 0, -1)
(x > 0) & (!is.na(x))
# [1] FALSE TRUE FALSE FALSE
(外括号不是必需的,但对于机器以外的几乎任何人来说,这将使语句更容易阅读。)
编辑 :
## If you want 0s and 1s
((x > 0) & (!is.na(x))) * 1
# [1] 0 1 0 0
最后,你可以把整个事情变成一个函数:
isPos <- function(x) {
(x > 0) & (!is.na(x)) * 1
}
isPos(x)
# [1] 0 1 0 0
关于r - 如何在 ifelse 语句中忽略 NA,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/13598511/