[Date Index]
[Thread Index]
[Author Index]
Left/right justifying rotated text [ corrected ]
*To*: mathgroup at smc.vnet.net
*Subject*: [mg46972] Left/right justifying rotated text [ corrected ]
*From*: kj <socyl at 987jk.com>
*Date*: Thu, 18 Mar 2004 01:24:57 -0500 (EST)
*Sender*: owner-wri-mathgroup at wolfram.com
[ NB: I noticed a potentially confusing omission in my original
post; I've fixed it in this repost. ]
I want to place rotated text in a graphic in such a way that the
left (or right) edge of the text lands on the specified location
{x, y}. When I say "left" (or "right") edge of the text, I mean
the edge corresponding to the left (or right) edge of the *unrotated*
text, *not* the left (or right) edge of a bounding box around the
*rotated* text having its sides parellel to the coordinate axes.
^^^^^^^^^
The text in question is to be rotated by an angle other than an
integral multiple of Pi/2. For example, if the string in question
is "rotated", the location is {0, 0}, and the rotation angle is
Pi/4, I want the midpoint of the left edge of the initial "r" to
be in the upper right quadrant, more or less at Scaled[{0.03,
0.03}].
When I try
Show[
Graphics[
Text["rotated", {0, 0}, {-1, 0}, {Cos[Pi/4], Sin[Pi/4]}]],
Axes->True];
the text is rotated correctly , but placed such that the "r" is in
the lower left quadrant, and {0, 0} appears right above the "t"
(or the "o", depending on how one interprets the word "above").
This doesn't agree with the documentation for Text, no matter how
I interpret it.
How can I do what I want to do?
Thanks!
kj
P.S. Is this a hopelessly difficult task in Mathematica?
--
NOTE: In my address everything before the period is backwards.
Prev by Date:
**Re: Exact real solutions of cubic equations**
Next by Date:
**Re: Mathematica 5: Integration bug in quadratic found by the GEMM machine**
Previous by thread:
**Antw: Binary File Read in Mathematica 5 for Mac OSX**
Next by thread:
**Re: Left/right justifying rotated text [ corrected ]**
| |