Re: graphics3d listanimate
- To: mathgroup at smc.vnet.net
- Subject: [mg111475] Re: graphics3d listanimate
- From: Bob Hanlon <hanlonr at cox.net>
- Date: Tue, 3 Aug 2010 06:33:56 -0400 (EDT)
Use a fixed PlotRange
a = Graphics3D[{Red, Thick,
Line[{{0, 0, 0}, {0, 1, 0}}]},
PlotRange -> {{0, 1}, {0, 1}, {0, 1}}];
b = Graphics3D[{Red, Thick,
Line[{{1, 0, 0}, {1, 1, 0}}]},
PlotRange -> {{0, 1}, {0, 1}, {0, 1}}];
ListAnimate[{a, b}]
Bob Hanlon
---- michuco <ibmichuco at hotmail.com> wrote:
=============
Hi,
Can one use ListAnimate with Graphics3D primitives?
I have two lines created by
a = Graphics3D[Line[{{0, 0, 0}, {0, 1, 0}}]];
b = Graphics3D[Line[{{1, 0, 0}, {1, 1, 0}}]];
and the following
ListAnimate[{a,b}]
doesn't show an animated sequence of two line alternating.
Any suggestion is appreciated,
Michuco