Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2001
*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 2001

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

Search the Archive

Re: Left Justifying PlotLabel?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg30306] Re: [mg30282] Left Justifying PlotLabel?
  • From: Timothy Stiles <tastiles at students.wisc.edu>
  • Date: Wed, 8 Aug 2001 01:34:00 -0400 (EDT)
  • References: <200108050002.UAA20874@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

I don't know about doing this in general, but for specific plots, you
could use Epilog to explcitly set a label on the left hand side of the
graph. As an example, evaluate the following

Plot[f^2, {f,0,10}, Epilog->[Text["Quadratic", Scaled[{0, 1}], {-1,-2}],
PlotRange->All]

using Scaled[{0,1}] always indicates the top left corner of the graph,
and an offset of {-1, -2} in the Text command ensures that the left hand
side of the text is a little above the left hand corner of the graph.

You could use a similar command for your question about inserting text
lines in a graphics. You'd have to experiment a little with the
coordinates that give the best results, but something like the following
could work

Show[GraphicsArray[{{g1,  g2},{ g3,  g4}}, GraphicsSpacing->0.3],
Epilog->{Text["row1", Scaled[{0.5, 0.5}]], Text["row2", Scaled[{0.5,
0}]]}, PlotRange->All]

where g1, g2, g3, ang g4 are plots or figures.

Hope this helps.

Tim Stiles

aes wrote:

> Any simple way to left justify PlotLabels?
>
> (as a default, or for an individual plot)



  • Prev by Date: No Page Break in Group?
  • Next by Date: From the MathGroup/Newsgroup Moderator
  • Previous by thread: Left Justifying PlotLabel?
  • Next by thread: Inserting Text Lines into GraphicsArray?