Re: Getting peak value from a Graph in Plot command - pls help
- To: mathgroup at smc.vnet.net
- Subject: [mg24020] Re: [mg23953] Getting peak value from a Graph in Plot command - pls help
- From: Adalbert Hanssen <hanssen at Zeiss.de>
- Date: Tue, 20 Jun 2000 03:07:35 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Hi, Fannon
What about taking the graphics object from a plot
with PlotRange->All and then extracting the min, max
and max-min by using
MiMaFromPlot[gr_]:=
Module[{p3d,plrMa,plrMi}
,p3d=If[Head[gr]===List
,gr[[1]]
,gr
];
{plrMi,plrMa}=Last[FullOptions[p3d,PlotRange]];
{plrMi,plrMa}={(41*plrMi+plrMa)/42,(plrMi+41*plrMa)/42};
{plrMi,plrMa,plrMa-plrMi}//Chop
]; (* MiMaFromPlot *)
Regards
Adalbert
fannews at email.com am 18.06.2000 10:18:00
An: mathgroup at smc.vnet.net@EMAIL
Kopie: (Blindkopie: Adalbert Hanssen/Aalen/Zeiss/DE)
Thema: [mg23953] Getting peak value from a Graph in Plot command - pls help
I would be grateful if anyone knows if there is any command that I can
use to extract the highest peak value from a graph in a Plot command?
Thanks alot!
Cheers......
Fannon