如何删除列满足数据框中某些条件的行

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（）函数返回数据帧中的列数。）