Example 12
3-D Vectors Plot with ListPlotVectorField3D
GIVEN: 3-D vector (x,y,z)
REQUIRED: Plot the vector field
SOLUTION:Generate example12.nb
Needs["Graphics`PlotField3D`"]
PlotVectorField3D[{y, -x, 0}, {x,-1,1,1},{y,-1,1},{z,0,2}]
data = Flatten[Table[{{x,y,z}, {y,-x,0}},{x,-1,1,1/3.},{y,-1,1,1/3.},{z,-1,1,1/3.}], 2];
ListPlotVectorField3D[data,ScaleFactor ->0.5]
zvals=Union[Map[Part[#, 1, 3]&, data]]
data1=Select[data, Part[#, 1,3] ===First[zvals]&]
ListPlotVectorField3D[data1,ScaleFactor ->0.1]
Example


Please send questions or suggestions about this web page to beatnic@aset.psu.edu
ASET | ITS | Penn State
|