Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2005
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2005

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

Search the Archive

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
| 



  • Prev by Date: Re: ListPlot3D Scatter Plot
  • Next by Date: Re: region bounded by surfaces
  • Previous by thread: Re: Maximum y-value in a list of xy pairs
  • Next by thread: Re: Maximum y-value in a list of xy pairs