Re: Question about Mathematica
- To: mathgroup at smc.vnet.net
- Subject: [mg106572] Re: Question about Mathematica
- From: Albert Retey <awnl at gmx-topmail.de>
- Date: Sat, 16 Jan 2010 06:14:47 -0500 (EST)
- References: <hipld8$7po$1@smc.vnet.net>
Hi,
>
> I have a table of a table of number pairs:
>
> {{{1,2),(3,-1),{2,-4)},{{1,2},{4,-5},{6,-8}},{{2,-1},{-2,-3},{-4,6}}}
>
> How may I find the minimum second element in each sub-table? For
> example, the first sub-table is:
>
> {{1,2},{3,-1},{2,-4}}
>
> I would like to then extract the {2,-4} element from this item. Then
> the {6,-8} from the second sub-table, then the {-2,-3} element from the
> last.
>
> Thank you,
> Dominic
One possibility:
Map[SortBy[#, Last][[1]] &, data]
hth,
albert