比较两列，然后在R软件包中替换

Question

我在循环中使用问题。我的问题是：如果两个列相等（具有176或184或180或182或163或167值）替换两个列= null

我写了脚本，但它不起作用。

for (i in dane.dzikie$REN75M10 && dane.dzikie$REN75M10.1) if (i==176 | 184 | 180 | 182 |
                                                          163 | 167) {i=NULL}

这是我数据的一部分：在此处输入图像描述

我想替换NA的第一，第五和最后一列，因为两个列都包含176或184或180或182或182或163或167值。条件在两列中都是相同的值。

Answer 1

# example dataframe something like this?
dane.dzikie <- data.frame(REN75M10=c(176, 184, 5, 6, 7), 
                          REN75M10.1=c(163,1,2,3,4), OTHER=c(163,2,3,4,5))
columns=c("REN75M10", "REN75M10.1")
invalid.values <- c(176,184,180,182,163,167)
dane.dzikie[,columns] <- 
   apply(dane.dzikie[,columns], 2, 
         function(x) ifelse(x %in% invalid.values, NA, x))