How to remove rows where columns satisfy certain condition in data frame

Question

I have a data frame that looks like this

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.

What I want to do is to remove all rows where the value of all its columns is smaller than 5. What's the way to do it?

Answer 1

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

Answer 2

First of all ...please stop using cbind to create data.frames. You will be sorry if you continue. R will punish you.

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

(The length() function returns the number of columns in a dataframe.)