MathGroup Archive 2001

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

Search the Archive

Problems in rendering Graphics3D with RealTime3D (Mathematica 4.1)


And here I am again. Why I did not get any clue at all to my previous

Now, if you run the Brian's example (with and without RealTime3D) you will
see what happen because the resulting shapes are rather different.

(sol = Flatten[(z /. Solve[#1, z] & ) /@ {3*x - 2*y + 4*z - 3 == 0, 
      2*x - 4*y + 3*z == 1, x - 3*y + 2*z == 5}])*
  (plts = Table[Plot3D[{sol[[i]], RGBColor[1/(2*i), 1/i, 0]}, {x, -3, 4}, 
     {y, -3, 3}, DisplayFunction -> Identity], {i, 1, 3}])*
  Show[plts, DisplayFunction -> $DisplayFunction, 
   ViewPoint -> {4.011, 1.453, 2.415}, BoxRatios-> {1,1,1}]



This email is confidential and intended solely for the use of the individual to whom it is addressed. Any views or opinions presented are solely those of the author and do not necessarily represent those of Sema Group. 
If you are not the intended recipient, be advised that you have received this email in error and that any use, dissemination, forwarding, printing, or copying of this email is strictly prohibited.

  • Prev by Date: Re: String to Number
  • Next by Date: Re: ReadList
  • Previous by thread: Re: RotateShape[Cuboid...
  • Next by thread: Mathematica & Generealized Additive Models