Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]

Groups > comp.soft-sys.math.mathematica > #1732

Re: Rotated text not appearing in a Plot

Show all headers | View raw

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@wolfram.com

Cheers -- Sjoerd


On Apr 15, 9:54 am, "J. McKenzie Alexander" <ja...@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

Back to comp.soft-sys.math.mathematica | Previous | Next — Previous in thread | Next in thread | Find similar | Unroll thread

Thread

Rotated text not appearing in a Plot "J. McKenzie Alexander" <jalex@lse.ac.uk> - 2011-04-15 07:54 +0000
  Re: Rotated text not appearing in a Plot "Sjoerd C. de Vries" <sjoerd.c.devries@gmail.com> - 2011-04-16 11:31 +0000
  Re: Rotated text not appearing in a Plot Peter Pein <petsie@dordos.net> - 2011-04-16 11:34 +0000

csiph-web