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: [mg58332] Re: [mg58328] False image plot
  • From: "Jaccard Florian" <Florian.Jaccard at he-arc.ch>
  • Date: Tue, 28 Jun 2005 21:56:33 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com

Hello !

I would do something like that :

data = Table[Random[Integer, {0, 10}], {10}, {3}]; 

max = Max[Last[Transpose[data]]]; 

min = Min[Last[Transpose[data]]]; 

data2 = data /. {x_, y_, z_} -> {PointSize[0.02], 
      Hue[0.7*(z/max)], Point[{x, y}]}; 

<< "Graphics`Legend`"

dessin = Show[Graphics[data2], Axes -> True, 
    DisplayFunction -> Identity, ImageSize -> 500]; 

ShowLegend[dessin, {Hue[0.7*#1] & , 15, ToString[min], 
    ToString[max], LegendShadow -> None, LegendPosition -> 
     {1.2, -0.78}, LegendSize -> {0.4, 1.4}, 
    LegendLabel -> "third value"}];

Regards
 
F.Jaccard

-----Message d'origine-----
De : tornado78 [mailto:tornado78 at hotmail.com] 
Envoyé : mardi, 28. juin 2005 11:14
À : mathgroup at smc.vnet.net
Objet : [mg58328] False image plot

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


  • Prev by Date: Re: Common factors in a list
  • Next by Date: Re: fitting a function
  • Previous by thread: Re: False image plot
  • Next by thread: Common factors in a list