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: False image plot

  • To: mathgroup at smc.vnet.net
  • Subject: [mg58374] Re: False image plot
  • From: Peter Pein <petsie at dordos.net>
  • Date: Tue, 28 Jun 2005 21:57:05 -0400 (EDT)
  • References: <d9r528$56u$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

tornado78 schrieb:
> Ok here is another one i need help on
> 
> How do you get mathematica to take three lists of numbers, plot one as x, one as y and the third not as a 3rd dimension but as a color value of some sort for example blue for low values, red and yellow for high values of the third set of numbers
> 
> thanks
> 
Say you've got
In[1]:=
x = Range[100]/100;
y = 4*x*(1 - x);
z = Sin[2*Pi*x]/x;

I want to use Hue[] for the colour. So I have to normalize the z-values:

In[4]:=
col = (z - Min[z])/(Max[z] - Min[z]);

And plot it:

In[5]:=
Show[Graphics[{Hue[#3], Point[{#1, #2}]}]&[Sequence @@ #1]& /@
   Transpose[{x, y, col}],
   PlotLabel -> "Gravity's Rainbow", Background -> DarkSlateBlue];

-- 
Peter Pein
Berlin


  • Prev by Date: Re: exact integer from Log[ ]
  • Next by Date: Re: exact integer from Log[ ]
  • Previous by thread: Re: False image plot
  • Next by thread: Re: False image plot