How to select numerical sublists?

Question

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!

$\begingroup$ Cases[{__?NumericQ}] @ ll $\endgroup$
– Kuba
Commented Feb 16, 2020 at 9:44 — Kuba, Commented Feb 16, 2020 at 9:44
$\begingroup$ @Kuba Thanks for this nice solution! $\endgroup$
– Ulrich Neumann
Commented Feb 16, 2020 at 9:51 — Ulrich Neumann, Commented Feb 16, 2020 at 9:51

Fraccalo · Accepted Answer · 2020-02-16 09:46:46Z

5

This should work:

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

{{1, 2, 3}, {[Pi], 4, 5}}

answered Feb 16, 2020 at 9:46

Fraccalo

6,11715 silver badges29 bronze badges

2

$\begingroup$ Thanks for your answer, I didn't know AllTrue $\endgroup$
– Ulrich Neumann
Commented Feb 16, 2020 at 9:52
1

$\begingroup$ @UlrichNeumann neither did I xD I was somehow convinced that All was a mathematica function for doing something like that (while it's actually all() and is a python function eheh), but while looking for it I found AllTrue in the documentation :P $\endgroup$
– Fraccalo
Commented Feb 16, 2020 at 10:30
1

$\begingroup$ Also: Select[AllTrue@NumericQ]@ll $\endgroup$
– eldo
Commented Feb 16, 2020 at 20:08

Add a comment |

1 Answer 1