>Does anyone know how to invert the x or y axis?
>I want the y-axis to increase downward, instead of upward.
>According to the "MathSource" said that we can use "MongoArray" package
>to adjust the direstion of each axis.
>HOWEVER, this package can only handel multiple graphics. Forthermore,
>the output size is very small. (I think it is designed for "shared" axes,
>not for single plot.)
>THEREFORE, does Mathematica can plot a graphic with inverted axis?
>
Sean,
Plot[x^2,{x,1,5}];
To reverse the axis, plot the negative of the function and label the axis
with its negative.
Plot[-x^2,{x,1,5},
Ticks->{Automatic,Join[Table[{-k, ""}, {k, 25}],
Table[{-k, k}, {k, 5, 25, 5}]]}];
Bob Hanlon
Here is a simple solution for your specific problem.
Plot[-x^2,{x,1,5},Ticks->{Automatic,Table[{i,-i},{i,-25,0,5}]}];
David Park
dj...@earthlink.net
http://home.earthlink.net/~djmp/