Search All of the Math Forum:

Views expressed in these public forums are not endorsed by NCTM or The Math Forum.

Notice: We are no longer accepting new posts, but the forums will continue to be readable.

Topic: ListVectorPlot3D
Replies: 1   Last Post: May 29, 2013 3:48 AM

 David Park Posts: 1,560 Registered: 5/19/07
Re: ListVectorPlot3D
Posted: May 29, 2013 3:48 AM

Often the ListPlots are not the best approach. A more general and intuitive
method is just to Map the graphics primitive (Point, Arrow, Line, whatever)
onto the list of points defining it. In your example the plot gets too
cluttered so I selected a random sample of 20 vectors from your test2 list.
And I also reversed the direction of the Arrows because it looks nicer.

Arrow /@ Reverse /@ RandomSample[test2, 20]},
Axes -> True]

David Park
djmpark@comcast.net
http://home.comcast.net/~djmpark/index.html

From: BBabic [mailto:bipsich101@gmail.com]

Hello, I am using Mathematica 9.
Not sure why, but it seems that Math can not plot non-equidistant set of 3D
vectors.
Here is an example.
We create two set of vector field data:

Equidistant
test = Flatten[
Table[{{x, y, z}, RandomReal[{-10, 10}, 3]}, {x, -40000, 40000,
5000}, {y, -40000, 40000, 5000}, {z, -40000, 40000, 5000}], 2];

random
test2 = Flatten[
Table[{RandomReal[{-40000, 40000}, 3],
RandomReal[{-10, 10}, 3]}, {x, -40000, 40000, 5000}, {y, -40000,
40000, 5000}, {z, -10000, 10000, 2000}], 2];

While ListVectorPlot3D[test]
works.
The ListVectorPlot3D[test2] just gives a Box without any error message.
Any insight why this is not working and comments or ideas to make workable
would be highly appreciated.
Cheers !