Re: How show axes labels with AxesOrigin->{0,0,0} in 3D?
- To: mathgroup at smc.vnet.net
- Subject: [mg119508] Re: How show axes labels with AxesOrigin->{0,0,0} in 3D?
- From: "Nasser M. Abbasi" <nma at 12000.org>
- Date: Tue, 7 Jun 2011 06:47:18 -0400 (EDT)
- References: <isi9s0$lvi$1@smc.vnet.net>
- Reply-to: nma at 12000.org
On 6/6/2011 3:24 AM, Murray Eisenberg wrote: > Since Mathematica 7, 3D graphics has allowed the AxesOrigin option so > that, for example, the axes can go through the origin {0,0,0}, just like > the way that mathematicians (or at least college calculus teachers) do > it and teach their students to do it. > > That works, but... > > If you include an AxesLabel option, the labels do not appear, e.g., from: > > Plot3D[x^2 - y^2, {x, -2, 2}, {y, -2, 2}, > AxesOrigin -> {0, 0, 0}, > AxesLabel -> {x, y, z}, > BoxRatios -> {1, 1, 1}, Boxed -> False] > > Is there some way to make the axes labels appear (other than to add them > manually using the Text function, say in an Epilog)? > > [And is this just another instance of WRI protracted stubbornness even > in admitting that having 3D axes emanating from the origin is a > permissible way of handling 3D graphics? (Scientific/engineering > convention seems overwhelmingly to favor axes along edges of a 3D > graphic, whereas in math -- as I suggested, at least in multivariable > calculus -- axes emanating from the origin is the norm.) > Hello; The axes labels are there, just hard to see. Here is a proof: Plot3D[x^2 - y^2, {x, -2, 2}, {y, -2, 2}, AxesOrigin -> {0, 0, 0}, AxesLabel -> {Style[x, Red, 40], Style[y, Red, 40], Style[z, Red, 40]}, BoxRatios -> {1, 1, 1}, Boxed -> False] I consider axes labels for 3D not be well implemented in Mathematica. Please see this discussion http://stackoverflow.com/questions/6182804/mathematica-help-me-understand-mathematica-3d-coordinates-system --Nasser