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] ====