Clean data based on row values

Questions
1

I have a large file of data with the following structure:

data = {{700., 0.1, 0.2, 0.3}, {800., 10., 30., 40.}, {900., 0.1, 1.4,
     15.}};

What I would like is to clean the data, eliminating rows whose maximum value from the 2nd column onwards is less than 1.

In the simplified example I have used before, only the 1st row should be deleted.

Does anyone know how can this be done using Mathematica?

Thanks in advance for any help!

2

One way might be:

Select[data, Max[#[[2 ;;]]] >=  1 &]
3

Although Henrik’s suggestion will definitely work, I.e. select the rows that you do want, just for completeness, you may also like to look at DeleteCases. That function allows you to remove the rows you don’t want.

Cheers
Andy

4

Thank you very much for your reply!

It is a simple and fast method.