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