Re: x and y plot finding maximum
- To: mathgroup at smc.vnet.net
- Subject: [mg122966] Re: x and y plot finding maximum
- From: Bob Hanlon <hanlonr357 at gmail.com>
- Date: Sat, 19 Nov 2011 06:43:50 -0500 (EST)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- References: <201111181121.GAA06431@smc.vnet.net>
data = RandomInteger[{0, 100}, {5, 2}]
{{23, 97}, {55, 31}, {52, 17}, {58, 30}, {98, 40}}
{minX, minY} = Min /@ Transpose[data]
{23, 17}
Cases[data, {minX, _}]
{{23, 97}}
Cases[data, {_, minY}]
{{52, 17}}
{maxX, maxY} = Max /@ Transpose[data]
{98, 97}
Cases[data, {maxX, _}]
{{98, 40}}
Cases[data, {_, maxY}]
{{23, 97}}
Bob Hanlon
On Fri, Nov 18, 2011 at 6:21 AM, florian <flott32 at hotmail.com> wrote:
> It seems like a fairly simple job but somehow i cannot find a solution.
>
> I have a list of coordinates lista={{3,2},{4,8},...}
>
> What i would like to do is to find the max/min y and x coordinates.
>
> Help would be really appreciated!! Thanks!!!
>
- References:
- x and y plot finding maximum
- From: florian <flott32@hotmail.com>
- x and y plot finding maximum