如何在R语言中简化多组OR与AND逻辑条件的代码写法？

基础跨变量条件简化 #

或条件（x1 == 1 | y1 == 1） #

如果只有两个变量，原写法已经足够简洁直观。但如果需要判断多个变量中至少一个等于某个值，可以用rowSums结合矩阵绑定来简化：

# 示例：判断x1、y1、z1中至少一个等于1
rowSums(cbind(x1, y1, z1) == 1) >= 1

也可以用apply配合any：

apply(cbind(x1, y1, z1), 1, function(vec) any(vec == 1))

与条件（x1 == 1 & y1 == 1） #

两个变量的场景下原写法最直接。若要判断多个变量全部等于某个值，同样可以用rowSums：

# 示例：判断x1、y1、z1全部等于1
rowSums(cbind(x1, y1, z1) == 1) == 3

或者apply配合all：

apply(cbind(x1, y1, z1), 1, function(vec) all(vec == 1))

组合条件简化（(x1 == 1 | x1 == 2) & (y1 == 1 | y1 == 2)） #

直接用%in%分别处理每个变量，就能得到非常紧凑且可读性高的代码：

x1 %in% 1:2 & y1 %in% 1:2

如果需要扩展到更多变量（比如加上z1），直接延续这个模式即可：

x1 %in% 1:2 & y1 %in% 1:2 & z1 %in% 1:2

代码验证示例 #

# 构造测试数据
x1 <- c(1, 2, 3, 4, 1)
y1 <- c(2, 3, 1, 4, 1)

# 原组合条件
original_cond <- (x1 == 1 | x1 == 2) & (y1 == 1 | y1 == 2)
# 简化后的条件
simplified_cond <- x1 %in% 1:2 & y1 %in% 1:2

# 确认结果一致
all(original_cond == simplified_cond) # 返回TRUE

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