Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2008

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

Search the Archive

Re: Problem for using "Epilog" to plot legend

  • To: mathgroup at smc.vnet.net
  • Subject: [mg87494] Re: Problem for using "Epilog" to plot legend
  • From: Albert Retey <awnl at arcor.net>
  • Date: Fri, 11 Apr 2008 05:57:14 -0400 (EDT)
  • References: <ftmtuu$4ob$1@smc.vnet.net>

davis wrote:
> Dear Group
> 
> i want to use "Epilog" to plot a legend,but i have a problem for the "Line" command.
> 
> ListPlot[{{1, 2, 3, 5, 8}, {2, 3, 6, 9, 10}}, Joined -> True, 
>  PlotMarkers -> Automatic, 
>  Epilog -> 
>   Inset[Framed@
>     Column[{Graphics[{DotDashed, Line[{{1, 0}, {2, 0}}]}] Style["a"], 
>       Graphics[{Dotted, Line[{{1, 0}, {2, 0}}]}] Style["b"]}, 
>      Spacings -> 0, ItemSize -> {15, 0.5}], {1.25, 7}]]
> 
> the space between different rows in "legend area" are really large,
> 
> but if i change the Line condition,such like below
> 
> ListPlot[{{1, 2, 3, 5, 8}, {2, 3, 6, 9, 10}}, Joined -> True, 
>  PlotMarkers -> Automatic, 
>  Epilog -> 
>   Inset[Framed@
>     Column[{Graphics[{DotDashed, Line[{{100, 0}, {2, 0}}]}] 
>        Style["a"], 
>       Graphics[{Dotted, Line[{{100, 0}, {2, 0}}]}] Style["b"]}, 
>      Spacings -> 0, ItemSize -> {15, 0.5}], {1.25, 7}]]
> 
> the rows became close to each other, but the length of the lines became too long
> 
> how can i solve this?
> 
> thank you
> 

I found Grid to be more fitted for these things, because you can take 
much more control about all the details like item sizes. Using 
Dividers->All also gives you an idea what the sizes and margins really 
are. This should be a reasonable starting point for fine tuning:

ListPlot[{{1, 2, 3, 5, 8}, {2, 3, 6, 9, 10}}, Joined -> True,
  PlotMarkers -> Automatic,
  Epilog -> Inset[Framed@Grid[{{
        Graphics[{DotDashed, Line[{{100, 0}, {2, 0}}]}] , Style["a"]
        }, {
        Graphics[{Dotted, Line[{{100, 0}, {2, 0}}]}] , Style["b"]
        }},
      ItemSize -> {{5, 2}, 0.5},
      Dividers -> None
      ],
    {1.25, 7}]
  ]

hth,

albert


  • Prev by Date: Re: A Problem with Simplify
  • Next by Date: Re: Directory of Mathematica Add-Ons
  • Previous by thread: Problem for using "Epilog" to plot legend
  • Next by thread: Re: Problem for using "Epilog" to plot legend