R选择数据子集

Question

我有一个包含三列的数据集。

## generate sample data
set.seed(1)
x<-sample(1:3,50,replace = T )
y<-sample(1:3,50,replace = T )
z<-sample(1:3,50,replace = T )
data<-as.data.frame(cbind(x,y,z))

我想做的是:

1. 选择所有三列都为 1 的行

2. 选择那些只有两列有 1 的行(可以是任何列)

3. 只选择那些只有列有 1 的行(可以是任何列)

基本上我想要任何两列(对于第二种情况)来满足条件，而不是任何特定的列。

我知道行选择使用

subset<-data[c(data$x==1,data$y==1,data$z==1),]

但这只会根据特定列的条件选择那些行，而我希望三列/两列中的任何一列满足我的条件

谢谢

Answer 1

n = 1 # or 2 or 3
data[rowSums(data == 1) == n,]