Re: Another question on lists
- To: mathgroup at smc.vnet.net
- Subject: [mg80643] Re: [mg80618] Another question on lists
- From: Bob Hanlon <hanlonr at cox.net>
- Date: Tue, 28 Aug 2007 02:04:48 -0400 (EDT)
- Reply-to: hanlonr at cox.net
aList = {{a, b, c}, Range[5], {1, a, 2, b, 3, c}, {1, 2}};
Select[aList, Length[#] == Max[Length /@ aList] &]
{{1, a, 2, b, 3, c}}
Select[aList, Length[#] == Min[Length /@ aList] &]
{{1, 2}}
Bob Hanlon
---- Mauricio Esteban Cuak <cuak2000 at gmail.com> wrote:
> Hello again.Thank you very much for your previous help. However, I
> seem to stumble on another rock:
>
> I have a list of n sub-lists with different number of elements. I
> want to select the list with the highest number of elements.
> I tried to combine the Select function with Lenght but couldn't do it:
>
> Select[list, Length /@ list >= Max[Length /@ list] &]
>
> Thanks for reading.
>
> Regards,
>
> cd
>
> P.D.: Any tips,websites, books, on how to learn some basic programming
> on Mathematica?
> I'm slowly beginning to read "The Mathematica Book"...should I just
> concentrate on that?
>