Mathematica 9 is now available
Student Support Forum
-----
Student Support Forum: 'Text on surface is upside down' topicStudent Support Forum > General > "Text on surface is upside down"

Next Comment >Help | Reply To Topic
Author Comment/Response
Bill
09/30/08 08:27am

Hi:

The Mathematica 6.0.1 code below, creates a 3D plot.

Clear[map, grid, R, r, u, w]
map = Rasterize["\t\tTorus\t\t", "RGBColor", ImageSize -> {150, 30}];
grid = Take[Dimensions[map, 2] - 1];
R = 10;
r = 2;
ParametricPlot3D[{(R + r Cos[2 Pi u]) Cos[2 Pi w], -(R + r Cos[2 Pi u])
Sin[2 Pi w], r Sin[2 Pi u]}, {u, 0, 1}, {w, 0, 1},
Mesh -> Reverse[grid], MeshStyle -> None,
MeshFunctions -> {#5 &, #3 &}, MeshShading -> map,
PlotStyle -> White, Lighting -> "Neutral",
Background -> LightCyan, Axes -> True,
AxesLabel -> {"x", "y", "z"}, Boxed -> True,
ViewPoint -> {-10.5, -3, 0.75}, ImageSize -> 500]

It outputs a torus with the word "Torus" written on the surface upside down. I can rotate the plot upside down with the mouse for the word "Torus" to look correct, but then the z axis shows -2 on top and 2 on the bottom. I want to show the plot box, coordinate axes and axes labels in the plot in a normal right hand coordinate configuration, with the text "Torus" rightside up.

How do I do that?



Thanks,

Bill

URL: ,

Subject (listing for 'Text on surface is upside down')
Author Date Posted
Text on surface is upside down Bill 09/30/08 08:27am
Re: Text on surface is upside down Peter Pein 10/02/08 3:52pm
Re: Re: Text on surface is upside down Bill 10/04/08 1:25pm
Next Comment >Help | Reply To Topic