MathGroup Archive 2005

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

Search the Archive

Re: Dashing shown in legend?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg61090] Re: Dashing shown in legend?
  • From: "Jens-Peer Kuska" <kuska at informatik.uni-leipzig.de>
  • Date: Mon, 10 Oct 2005 02:39:51 -0400 (EDT)
  • Organization: Uni Leipzig
  • References: <diaaof$ic1$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

Hi,

something like

Needs["Graphics`Legend`"]
Needs["Graphics`Graphics`"]

bc = BarChart[{1, -3, 4, 5, 2, 3}, {3, 6, 4, 3}];

Block[{$DisplayFunction = Identity},
ShowLegend[
bc, {{{RGBColor[1, 0, 0], "Humpty"}, {RGBColor[0,0, 1],
"Dumpty"}}}]] /. {c_RGBColor,
Rectangle[{x1_, y1_}, {x2_, y2_}]} :> {c,
Rectangle[{x1, y1}, {x2, y2}], {RGBColor[0, 0, 0],
AbsoluteDashing[{2, 2}],
Line[{{x1, y1}, {x2, y1}, {x2, y2}, {x1, y2}, {x1,y1}}]}} // Show

Regards
  Jens

"kristoph" <kristophs.post at web.de> schrieb im 
Newsbeitrag news:diaaof$ic1$1 at smc.vnet.net...
| Is it possible to show the dashing from the 
baredge in the legend?
| Thanks for help.
| 



  • Prev by Date: Re: Skipping Elements in Sum
  • Next by Date: Re: leaveing out empty ticks that have no data
  • Previous by thread: Dashing shown in legend?
  • Next by thread: Skipping Elements in Sum