# How to select numerical sublists?

I got stuck with a simple problem:

Given a list of lists

ll={{1,2,3},{2,a},{Pi,4,5}}


I would like to select only those sublists which are numeric -> {{1,2,3}, {Pi,4,5}}.

I tried

Select[ll, (Map[Apply[And, NumericQ], #] &)]


which doesn't work.

How to solve this problem? Thanks!

• Cases[{__?NumericQ}] @ ll – Kuba Feb 16 '20 at 9:44
• @Kuba Thanks for this nice solution! – Ulrich Neumann Feb 16 '20 at 9:51

Select[ll, AllTrue[#, NumericQ] &]

• Thanks for your answer, I didn't know AllTrue – Ulrich Neumann Feb 16 '20 at 9:52