Re: newbie graph question
- To: mathgroup at smc.vnet.net
- Subject: [mg39774] Re: newbie graph question
- From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
- Date: Fri, 7 Mar 2003 03:30:25 -0500 (EST)
- Organization: Universitaet Leipzig
- References: <b46um4$93j$1@smc.vnet.net>
- Reply-to: kuska at informatik.uni-leipzig.de
- Sender: owner-wri-mathgroup at wolfram.com
Hi,
no Mathematica can't "really" rotate anything, you have to
turn you head or to rotate your monitor.
May be, that something like
Block[{$DisplayFunction = Identity},
gr = Plot[Sin[x], {x, 0, Pi}, Frame -> False, Axes -> True,
AxesLabel -> {"Hello", "real rotation"}]
];
Show[FullGraphics[gr] /.
Text["Hello", pos_, ___] :>
Table[Text["Hello", pos, {0, 0}, {Cos[phi], Sin[phi]}], {phi, 0,
2Pi,
Pi/4}] /.
Text["real rotation", pos_, ___] :>
Table[Text["real rotation", pos, {0, 0}, {Cos[phi], Sin[phi]}],
{phi, 0,
2Pi, Pi/4}], PlotRange -> All]
help you
Regards
Jens
Stewart Mandell wrote:
>
> Is it possible to have horizontal tick axes labels "really" rotated 90
> degrees.
> i.e. "Hello" rotated 90 degrees counter-clockwise about its right-center
> anchor
> point.
>
> thank you