Rotated Axes Labels on Plot3D
- To: mathgroup at smc.vnet.net
- Subject: [mg74437] Rotated Axes Labels on Plot3D
- From: Lawrence Walker <lwalker701 at earthlink.net>
- Date: Wed, 21 Mar 2007 02:51:47 -0500 (EST)
The Plot command has an option for rotating axes labels, RotateLabel.
This accommodates really long labels. However, Plot3D does not. This
was mentioned before in a Mathgroup thread titled, "Aligned Axes Labels
on Plot3D (Fri, 26 Apr 2002)". The solution recommended by the writer
did not work for me.
Alternatively, I used a combination of Text and Rectangle to align a
label along the z-axis of a Plot3D graphics:
plt = Plot3D[Sin[x y], {x, 0, 4}, {y, 0, 5},
AxesLabel -> {"x", "y", ""}, ColorFunction -> Hue,
TextStyle -> {FontFamily -> "Times", FontSize -> 12}];
plt2 = Graphics[{Rectangle[{.2, 0}, {1, 1}, plt]}];
Show[Graphics[{Text[
"really long label", Scaled[{.1, .5}], {0, 0}, {0, 1}]}], plt2]
Is there an easier way to do this?
Also, I typically set all of my graphics to show fonts as size-10 Times
by using the following "$TextStyle = {FontFamily -> "Times", FontSize ->
10}". Unfortunately, my fonts often run together as if I didn't include
spaces. For instance, the above label "really long label" appears as
"reallylonglabel". How do I fix this?
--
Lawrence A. Walker Jr.
Maryland USA