Re: Maximum y-value in a list of xy pairs
- To: mathgroup at smc.vnet.net
- Subject: [mg61164] Re: Maximum y-value in a list of xy pairs
- From: "Jens-Peer Kuska" <kuska at informatik.uni-leipzig.de>
- Date: Tue, 11 Oct 2005 06:19:11 -0400 (EDT)
- Organization: Uni Leipzig
- References: <difq2j$f3i$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Hi, Max[Transpose[pairs][[2]]] ?? Regards Jens <mike_in_england2000 at yahoo.co.uk> schrieb im Newsbeitrag news:difq2j$f3i$1 at smc.vnet.net... | Hi | | Is there an easy way of finding the maximum y-value of a list of x-y | pairs? For example: | | pairs = {{0, 0.175}, {1, 0.54}, {2, 0.27}, {3, 0.47}, {4, 0.325}, {5, | 0.527}, {6, 0.22}, {7, 0.742}, {8, 0.109}, {9, 0.3314}, {10, | 0.1481}} | | Max[pairs] gives 10 which isnt what I want. At the moment I am doing | this: | | maxy = 0; | Do[ | currentx = pairs[[count]][[1]]; | currenty = pairs[[count]][[2]]; | If[currenty > maxy, | maxy = currenty; | x = currentx; | ]; | , {count, 1, Length[pairs]} | ] | Print[{x, maxy}] | | Which gives the maximum y value along with with its x-value but I | suspect that there is a much more elegant way. Any help would be | appreciated. | | Thanks, | | Mike |