Re: How to rebase a List of Values?
- To: mathgroup at smc.vnet.net
- Subject: [mg6908] Re: [mg6852] How to rebase a List of Values?
- From: Xah Lee <xah at best.com>
- Date: Fri, 25 Apr 1997 14:00:38 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
At 2:44 AM -0400 4/24/97, Patrick Kopitz wrote:
>Say I have one List containing values from 1000 to 5000 and a second from
>30 to 70.
>I want to rebase those lists at 100 so the two will show on a graphic with
>the same scale.
You can rescale your data using this formula (dataPoint-min)/(max-min).
This will put all dataPoint between 0 and 1. (Did I misunderstand the
problem?)
You can implement it in mma using a pure function and Map. Example:
myList1= Table[Random[Integer,{1000,5000}], 100];
myList2= Table[Random[Integer,{30,70}], 100];
myNewList1 = ( (#-5000)/(5000-1000)& /@ myList1);
myNewList2 = ( (#-30)/(70-30)& /@ myList2);
Show[Graphics[{ Hue[0], First@ ListPlot[myNewList1], Hue[.7], First@
ListPlot[myNewList2]}],AspectRatio->Automatic];
The last line also answers a recent query on how to put two two ListPlot
into one with different color.
Warning: I have not tested the code above, but it should work.
Xah
xah at best.com
http://www.best.com/~xah/SpecialPlaneCurves_dir/specialPlaneCurves.html
Mountain View, CA, USA
"Morality abets evil"