R 中数据中带有 NA 的 if 语句出错

Question

我对 in if 语句有疑问。我收到一条错误消息，说“需要 TRUE / FALSE 的地方缺少值”。我正在尝试使用 if 语句和 for 循环计算一个新变量，但数据具有 NA 值，并且我使用的循环在找到 NA 值后无法继续工作。

这是我用来创建新变量的变量：

x=c(3,3,3,2,NA,2,3,NA,3,NA)
y=c(3,6,5,4,NA,3,2,NA,3,NA)
h=c(1,2,1.6666667,2,NA,1.5,0.6666667,NA,1,NA)

我正在使用的代码存在 NA 值问题：

z=rep(NA,length(y))
for(i in 1:length(x)){
if((x[i]==0 & y[i]>=3) | h[i]>=3){
  z[i]=1
} else if((x==0 & y[i]<3) | h[i]<3){
  z[i]=0
}
}

你能告诉我如何将 NA 值包含到 if 语句中或者我应该怎么做吗？感谢您的回复。

Answer 1

您可以查看!is.na()。此操作也是矢量化的，因此您不需要 for 循环。

inds <- x == 0 & y >= 3 | h >= 3
as.integer(inds & !is.na(inds))
#[1] 0 0 0 0 0 0 0 0 0 0

None 的值符合这里的条件。

Answer 2

我们可以在 NA 的基础上插入 is.na

进行更改

for(i in 1:length(x)){
  if((x[i] %in% 0 & y[i]>=3 & !is.na(y[i])) | h[i]>=3 & !is.na(h[i])){
   z[i]=1
} else if((x[i] %in% 0 & y[i]<3 & !is.na(y[i])) | h[i]<3 & !is.na(h[i])){
   z[i]=0
    }
}

R 中数据中带有 NA 的 if 语句出错

Error in if statement with NA in data in R

for-loop

if-statement

r

na