Re: Rotate axes label in 3D graphics
- To: mathgroup at smc.vnet.net
- Subject: [mg87100] Re: Rotate axes label in 3D graphics
- From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
- Date: Mon, 31 Mar 2008 04:52:38 -0500 (EST)
- Organization: Uni Leipzig
- References: <fsq2f6$gu3$1@smc.vnet.net>
- Reply-to: kuska at informatik.uni-leipzig.de
Hi,
Plot3D[x*Exp[-x^2 - y^2], {x, -2, 2}, {y, -2, 2},
AxesLabel -> {x, y, " "}, PlotRangePadding -> 0.25] /.
Graphics3D[dta_, opts___] :>
Graphics3D[{dta,
Text["intensity", {-2.4, -2.4, 1}, {0, 0}, {0, 1}]}, opts]
Regards
Jens
Ivan wrote:
> Hi,
>
> I plotted two 3D surface figures, g1 and g2, and compined them using
> Show[] as the following:
>
> Show[ g1, g2, AxesLabel->{"x", "y", "intensity"} ]
>
> How can I rotate the label on the third axes?
>
>
> Alternatively I tried using
>
> Epilog->{ Rotate[ {Text[StyleForm["intensity"],{ <insert
> coord> } ] ,Pi/2 }
>
> but got error message
>
> Graphics::gprim: <.....omit>
> was encountered where a Graphics primitive or directive was expected
>
>
> Can anyone tell me how to solve this problem?
>
>
>