Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2008

[Date Index] [Thread Index] [Author Index]

Search the Archive

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?
> 
> 
> 


  • Prev by Date: Re: IsIntegerOrFloat
  • Next by Date: Re: variance of product of 2 independent variables
  • Previous by thread: Rotate axes label in 3D graphics
  • Next by thread: same color above a treshold