Re: How to get y-axis numbers on the right?
- To: mathgroup at smc.vnet.net
- Subject: [mg4400] Re: How to get y-axis numbers on the right?
- From: Xah Lee <xah at best.com>
- Date: Fri, 19 Jul 1996 03:06:45 -0400
- Organization: Best Internet Communications
- Sender: owner-wri-mathgroup at wolfram.com
Gabriel Berriz wrote:
>Is there a way to have Mathematica plot the vertical axis numbers
>on the right, instead of the left?
>(Or, for the horizontal axis, above, instead of below?)
Use FullGraphics to convert the axis and ticks into graphics primitives,
then use Replace and Rule to adjust the positioning of the tick symbols.
Example,
myGraphics = Plot[ t, {t,-2,2},
PlotPoints->2,
Ticks->{Range[-5,5], Range[-5,5]},
AspectRatio->Automatic];0;
Show[
(FullGraphics@ myGraphics) /. {
Text[ a_,b_,{c1_,0.}] -> Text[a,b,{-4 c1,0.}],
Text[ a_,b_,{0.,c2_}] -> Text[a,b,{0.,-c2}]
}
];0;
If you are using a Mac, you might want to get Rotater--An excellent
freeware for visualing wireframes in realtime, together with a
mathematica to Rotater converter package. You can get them at
http://www.best.com/~xah/PageTwo_dir/MathPrograms_dir/mathPrograms.html
Xah
xah at best.com; 74631.731 at compuserve.com
http://www.best.com/~xah/SpecialPlaneCurves_dir/specialPlaneCurves.html
Mountain View, CA, USA
==== [MESSAGE SEPARATOR] ====