如何删除数据框中列满足特定条件的行

Question

我有一个看起来像这样的数据框

df <- data.frame(cbind(1:10, sample(c(1:5), 10, replace=TRUE)))
# in real case the columns could be more than two
# and the column name could be anything.

我要删除的所有行的所有列的值都小于5。这是怎么做的？

Answer 1

df[!apply(df,1,function(x)all(x<5)),]

Answer 2

首先...请停止使用cbind创建data.frames。 如果继续，您将感到抱歉。 R会惩罚你。

df[ !rowSums(df <5) == length(df), ]

（length（）函数返回数据帧中的列数。）