Services & ResourcesWolfram ForumsMathGroup Archive

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

Re: VectorPlot3D

• To: mathgroup at smc.vnet.net
• Subject: [mg127653] Re: VectorPlot3D
• From: Bob Hanlon <hanlonr357 at gmail.com>
• Date: Sat, 11 Aug 2012 04:32:12 -0400 (EDT)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com
• Delivered-to: l-mathgroup@wolfram.com
• Delivered-to: mathgroup-newout@smc.vnet.net
• Delivered-to: mathgroup-newsend@smc.vnet.net
• References: <20120810064221.3521E683D@smc.vnet.net>

Use the option VectorScale

Needs["VectorAnalysis`"]

Clear[f]
f[x_, y_, z_: 0] = {y, -x, z};

rotF[x_, y_, z_] =
  Curl[f[x, y], Cartesian[x, y, z]];

Partition[
  VectorPlot3D[rotF[x, y, z],
     {x, -1, 1}, {y, -1, 1}, {z, -3, 0},
     VectorStyle -> "Arrow3D",
     VectorScale -> #,
     ImageSize -> 300,
     PlotLabel -> #] & /@
   {Tiny, Small, Medium, Large,
    .07, {.04, .45, None}},
  2] // Grid


Bob Hanlon


On Fri, Aug 10, 2012 at 2:42 AM, Sergio Miguel Terrazas Porras
<sterraza at uacj.mx> wrote:
> Hi Guys!
>
>
>
> Plotting certain 3 Dimensional vector fields produces a not so pretty 3D graphics.
>
>
>
> I looked at the options for VectorPlot3D and did not see any way to control the size of the arrowheads.
>
>
>
> They are just too big for certain fields.
>
>
>
> Here is a sample of simple code.
>
>
>
> <<"VectorAnalysis`"
>
> Clear[f]
>
> f[x_,y_,z_]={y,-x,0};
>
> rotF[x_,y_,z_]=Curl[f[x,y,z],Cartesian[x,y,z]];
>
> VectorPlot3D[rotF[x,y,z],{x,-1,1},{y,-1,1},{z,-3,0},VectorStyle->"Arrow3D"]
>
>
>
> Any suggestions as to how to make the vector field look more appealing?
>
>
>
> Thanks,
>
>
>
> Sergio Terrazas
>

• Follow-Ups:
  • Re: VectorPlot3D
    • From: Sergio Miguel Terrazas Porras <sterraza@uacj.mx>

• References:
  • VectorPlot3D
    • From: Sergio Miguel Terrazas Porras <sterraza@uacj.mx>