Problems in rendering Graphics3D with RealTime3D (Mathematica 4.1)
- To: mathgroup at smc.vnet.net
- Subject: [mg27209] Problems in rendering Graphics3D with RealTime3D (Mathematica 4.1)
- From: "Emilio Martin-Serrano Sobrino" <emilio.martin at sema.es>
- Date: Mon, 12 Feb 2001 03:20:49 -0500 (EST)
- Sender: owner-wri-mathgroup at wolfram.com
Hey:
And here I am again. Why I did not get any clue at all to my previous
question?.
Now, if you run the Brian's example (with and without RealTime3D) you will
see what happen because the resulting shapes are rather different.
<<RealTime3D`
(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}]
Regards
Emilio
------------------------------------------------------------------
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.
------------------------------------------------------------------