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: ListDensityPlot Legend?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg58663] Re: [mg58653] ListDensityPlot Legend?
  • From: "David Park" <djmp at earthlink.net>
  • Date: Wed, 13 Jul 2005 03:28:55 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com

Juergen,

How about something like the following?

Needs["Graphics`Colors`"]

matrix = Table[Random[Integer, {0, 2}], {25}, {25}];

colorfunc[z_] := Switch[z, 0, DodgerBlue, 1, LimeGreen, 2, Apricot]

mplot = ListDensityPlot[matrix,
      Frame -> False,
      ColorFunction -> colorfunc,
      ColorFunctionScaling -> False,
      DisplayFunction -> Identity];

Show[Graphics[
      {Rectangle[{0, 0}, {1, 1}, mplot],
        colorfunc[0], Rectangle[{1.05, 0.5}, {1.15, 0.6}],
        colorfunc[1], Rectangle[{1.05, 0.6}, {1.15, 0.7}],
        colorfunc[2], Rectangle[{1.05, 0.7}, {1.15, 0.8}],
        Black,
        Text[0, {1.1, 0.55}],
        Text[1, {1.1, 0.65}],
        Text[2, {1.1, 0.75}],
        Text["Data Matrix", {0.2, 1.05}, {-1, 0}]}],
    PlotRange -> {{-0.05, 1.3}, {-0.05, 1.1}},
    AspectRatio -> Automatic,
    TextStyle -> {FontSize -> 14, FontWeight -> "Bold"},
    Background -> Linen,
    ImageSize -> 450];

David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/ 

From: juejung [mailto:juejung at indiana.edu]
To: mathgroup at smc.vnet.net


dear mathgroup,

how does one add a legend to a ListDensityPlot.
i've a matrix that contains only 0,1 or 2 entries. ListDensityPlot plots  
the regions in three different colors. i would like to add a legend that  
indicates the colors and their corresponding numbers (0,1, or 2).
Tom Wickham-Jones' ExtendGraphics package is doing almost what i want for  
ListContourPlot, however, for ListDensityPlot it's not working.
Any ideas?

thanks
juergen



  • Prev by Date: Re: //N bug, but WHY?
  • Next by Date: What we get from (0.0*x), (0.0^x) and similar stuff
  • Previous by thread: Re: ListDensityPlot Legend?
  • Next by thread: What we get from (0.0*x), (0.0^x) and similar stuff