Re: Labeling axes in VectorFieldPlot3D?
- To: mathgroup at smc.vnet.net
- Subject: [mg85965] Re: Labeling axes in VectorFieldPlot3D?
- From: "David Park" <djmpark at comcast.net>
- Date: Fri, 29 Feb 2008 06:17:16 -0500 (EST)
- References: <fq3b21$g3d$1@smc.vnet.net>
The following works:
VectorFieldPlot3D[B, {x, -1, 1}, {y, -1, 1}, {z, 0.01, 1},
VectorHeads -> True,
Axes -> True,
AxesLabel -> {x, y, z}]
You had to put in Axes -> True.
However, the Axes options do appear in red and that is because WRI did not
define the options for VectorFieldPlot3D properly for use in the
SyntaxInformation statement. Nevertheless, they work.
Those who have Presentations and want much nicer looking 3D arrows, with
colored arrowcones, can use:
Needs["Presentations`Master`"]
Draw3DItems[
{ColorData["Legacy"]["IndianRed"],
VectorFieldDraw3D[B, {x, -1, 1}, {y, -1, 1}, {z, 0.01, 1},
VectorHeads -> False,
ScaleFunction -> (#/5 &)] /.
Line[{tail_, head_}] :>
Arrow3D[tail,
head, {0.30, 0.07, 12, "AbsoluteWidth"}, {AbsoluteThickness[1],
Black}]},
NeutralLighting[0.2, 0.6, 0.1],
NiceRotation,
Axes -> True,
AxesLabel -> {x, y, z},
ImageSize -> 400]
--
David Park
djmpark at comcast.net
http://home.comcast.net/~djmpark/
"Jerry" <Jer75811 at yahoo.com> wrote in message
news:fq3b21$g3d$1 at smc.vnet.net...
> This works OK in V6
>
> << "VectorFieldPlots`"
>
> m = {1, 0, 0};
> r = {x, y, z}/Sqrt[x^2 + y^2 + z^2];
> B = (3 (m.r) r - m)
> VectorFieldPlot3D[B, {x, -1, 1}, {y, -1, 1}, {z, 0.01, 1},
> VectorHeads -> True]
>
> From Options[VectorFieldPlot3D] I see AxesLabel -> None
> listed. But inserting that option in the plot statement is
> ignored -- and AxesLabel is made red -- apparently something
> it doesn't like. Sure would like to identify the 3 axes,
> can someone help? Thanks.
>