Adding Legend to a ListDensityPlot
- To: mathgroup at smc.vnet.net
- Subject: [mg91899] Adding Legend to a ListDensityPlot
- From: Buz Barstow <buzb at mac.com>
- Date: Fri, 12 Sep 2008 05:27:21 -0400 (EDT)
Dear All, As a follow up to my previous question, I'd like to add a legend to a ListDensityPlot in Mathematica 6.0. I've able to do this with ShowLegend, using this command Show[ ShowLegend[ ListDensityPlot[ distanceDifferenceData, PerformanceGoal -> "Normal", Mesh -> Automatic, LabelStyle -> {FontFamily -> "Helvetica", FontSize -> 10}, ColorFunction -> "ThermometerColors", DataRange -> {{-2, 230}, {-2, 230}}, ColorFunctionScaling -> True, FrameLabel -> {Style["Residue Number", FontWeight -> Bold], Style["Residue Number", FontWeight -> Bold]} ], {ColorData["ThermometerColors"][1 - #1] &, 25, ">0.4", "<-0.6", LegendBorder -> {Black}, LegendPosition -> {1.1, -0.4}, LegendTextSpace -> 5, LegendBorderSpace -> 3, LegendShadow -> {0., 0.}} ], ImageSize -> {400, Automatic}] However, I'd really like to display the text in the legend in Helvetica, as in the rest of the plot. I've tried: {ColorData["ThermometerColors"][1 - #1] &, 25, Style[">0.4",FontFamily- >"Helvetica"], Style["<-0.6",FontFamily->"Helvetica"], LegendBorder -> {Black}, LegendPosition -> {1.1, -0.4}, LegendTextSpace -> 5, LegendBorderSpace -> 3, LegendShadow -> {0., 0.}} but each time I try this, Mathematica gives an error. Is there a way around this, or should I edit the text in an external program like Illustrator? Thanks! and all the best, --Buz