Services & ResourcesWolfram ForumsMathGroup Archive

[Date Index] [Thread Index] [Author Index]

Maximum y-value in a list of xy pairs

• To: mathgroup at smc.vnet.net
• Subject: [mg61124] Maximum y-value in a list of xy pairs
• From: mike_in_england2000 at yahoo.co.uk
• Date: Tue, 11 Oct 2005 03:20:14 -0400 (EDT)
• Sender: owner-wri-mathgroup at wolfram.com

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

• Follow-Ups:
  • Re: Maximum y-value in a list of xy pairs
    • From: curtis <gardyloo@mail.wsu.edu>
  • Re: Maximum y-value in a list of xy pairs
    • From: Sseziwa Mukasa <mukasa@jeol.com>