MathGroup Archive 2005

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

Search the Archive

Re: False image plot

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"}];


-----Message d'origine-----
De : tornado78 [mailto:tornado78 at] 
Envoyé : mardi, 28. juin 2005 11:14
À : mathgroup at
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


  • 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