MathGroup Archive 2013

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

Search the Archive

ListVectorPlot3D

  • To: mathgroup at smc.vnet.net
  • Subject: [mg130953] ListVectorPlot3D
  • From: BBabic <bipsich101 at gmail.com>
  • Date: Tue, 28 May 2013 04:18:09 -0400 (EDT)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com
  • Delivered-to: l-mathgroup@wolfram.com
  • Delivered-to: mathgroup-outx@smc.vnet.net
  • Delivered-to: mathgroup-newsendx@smc.vnet.net

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 !



  • Prev by Date: Re: Through[Divide[f1, f2][x]]
  • Next by Date: Re: Through[Divide[f1, f2][x]]
  • Previous by thread: ODE method of variation of parameters
  • Next by thread: Re: ListVectorPlot3D