MathGroup Archive 2009

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

Search the Archive

Re: Plot Label at bottom with quote marks

  • To: mathgroup at smc.vnet.net
  • Subject: [mg101696] Re: [mg101640] Plot Label at bottom with quote marks
  • From: Thomas Dowling <thomasgdowling at gmail.com>
  • Date: Tue, 14 Jul 2009 07:29:21 -0400 (EDT)
  • References: <200907120950.FAA16212@smc.vnet.net>

Hello,
I am not an expert here by any means, and there are probably neater
solutions, but what I do  is the following:

After writing the relevant text, click on the cell bracket of the graph, and
from the format menu choose Style -> Output.  This works on a Mac.

Tom Dowling

On Sun, Jul 12, 2009 at 10:50 AM, Don <donabc at comcast.net> wrote:

> The only way I know of to put a label at the bottom of a Plot is the
> following.
>
> p1 = Plot[{Sin[3 x] + 0.3 x,  0.3 x}, {x, 0, 10},
>   AxesLabel -> {Text[Style["Years", Bold, FontSize -> 14]],
>     Text[Style["Price", Bold, FontSize -> 14]]},
>    PlotRangePadding -> {0.5, 0.5},
>   PlotStyle -> {Black, Black}];
>
> Labeled[p1, "Fig. 1"]
>
> So far, so good.  But now, I want to use the Drawing Tool to put some text
> on the Plot  that comes out as a result of the above code.
>
> (Graphics -> Drawing Tools to bring up the palette of drawing tools.)
>
> When I click on the AE icon (for text) at the bottom of the palette and
> bring the resulting crosshairs
> onto the graph and click on the graph where I want the text to begin, quote
> marks appear around the label at the bottom ("Fig. 1") and I can't get rid
> of them.  From that point on, they print with the quote marks.
>
> Does anyone have a solution?  Thank you.
>
>


  • Prev by Date: Interactive .nb works, but converted .nbp fails
  • Next by Date: Re: stirring chocolate pudding backwards: identifying coordinates
  • Previous by thread: Plot Label at bottom with quote marks
  • Next by thread: Re: Plot Label at bottom with quote marks