MathGroup Archive 2011

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

Search the Archive

Re: Rotated text not appearing in a Plot

  • To: mathgroup at smc.vnet.net
  • Subject: [mg118184] Re: Rotated text not appearing in a Plot
  • From: "Sjoerd C. de Vries" <sjoerd.c.devries at gmail.com>
  • Date: Sat, 16 Apr 2011 07:31:39 -0400 (EDT)
  • References: <io8tjk$q7r$1@smc.vnet.net>

Looks like a bug to me.

This works:

Plot[x, {x, 1, 1000},
 Epilog ->
  {
   Text["Appears normally", {500, 300}],
   Rotate[Text["Appears normally", {500, 300}], 70 \[Degree]],
   Rotate[Text["Doesn't appear", {500, 300}], 40 \[Degree]]
   }, PlotRange -> All
 ]

with x instead of Log[x]

but this doesn't:

Plot[Log[x], {x, 1, 1000},
 Epilog ->
  {
   Text["Appears normally", {500, 300 // Log}],
   Rotate[Text["Appears normally", {500, 300 // Log}], 70 \[Degree]],
   Rotate[Text["Doesn't appear", {500, 300 // Log}], 40 \[Degree]]
   }, PlotRange -> All
 ]


everything the same except the function and the vertical range.

It's not Rotate per se, because if I add it to the first text that one
still works:

Plot[Log[x], {x, 1, 1000},
 Epilog ->
  {
   Rotate[Text["Appears normally", {500, 300 // Log}], 0 \[Degree]],
   Rotate[Text["Appears normally", {500, 300 // Log}], 70 \[Degree]],
   Rotate[Text["Doesn't appear", {500, 300 // Log}], 40 \[Degree]]
   }, PlotRange -> All
 ]

The same code works in Graphics:

Graphics[{Rotate[Text["Appears normally", {500, 300 // Log}],
   0 \[Degree]],
  Rotate[Text["Appears normally", {500, 300 // Log}], 70 \[Degree]],
  Rotate[Text["Doesn't appear", {500, 300 // Log}], 40 \[Degree]]}]

Using multiples of 90 degrees also works:

Plot[Log[x], {x, 1, 1000},
 Epilog ->
  {
   Rotate[Text["Appears normally", {500, 300 // Log}], 0 \[Degree]],
   Rotate[Text["Appears normally", {500, 300 // Log}], 90 \[Degree]],
   Rotate[Text["Doesn't appear", {500, 300 // Log}], 180 \[Degree]]
   }, PlotRange -> All
 ]


I'd suggest sending a bug report to support at wolfram.com

Cheers -- Sjoerd


On Apr 15, 9:54 am, "J. McKenzie Alexander" <ja... at lse.ac.uk> wrote:
> Hello,
>
> When I evaluate the following, the first two text items from the Epilog appear but the third, for some reason, does not. I'm working on an i7 iMac, running 10.6.7, Mathematica version 8.0.1, and I was wondering if this was a general bug or a version-specific bug.
>
> Plot[Log[x], {x, 1, 1000000},
>  Epilog -> {
>    Text["Appears normally", {500000, 12}],
>    Rotate[Text["Appears normally", {500000, 12}], Pi/2, {500000, 12}],
>    Rotate[Text["Doesn't appear", {500000, 12}], Pi/4, {500000, 12}]
>    }
>  ]
>
> Cheers,
>
> Jason
>
> --
> Dr J. McKenzie Alexander
> Department of Philosophy, Logic and Scientific Method
> London School of Economics and Political Science
> Houghton Street, London WC2A 2AE
>
> Please access the attached hyperlink for an important electronic communications disclaimer:http://lse.ac.uk/emailDisclaimer



  • Prev by Date: Re: Rotated text not appearing in a Plot
  • Next by Date: Sharing numerical data along with a Mathematica notebook
  • Previous by thread: Re: Rotated text not appearing in a Plot
  • Next by thread: Re: Rotated text not appearing in a Plot