x[rowSums(x >= 0.7) >= 3,]