Re: Animation
- To: mathgroup at smc.vnet.net
- Subject: [mg13787] Re: Animation
- From: "Allan Hayes" <hay at haystack.demon.cc.uk>
- Date: Fri, 28 Aug 1998 04:18:14 -0400
- References: <6rrbe2$1cl@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Alexander Braden Bates wrote in message <6rrbe2$1cl at smc.vnet.net>...
>
>Does anyone know of a way to interpolate between 3DListPlots with
>Animate so that the animation is smooth? Does 3.0 have an option for
>this?
>
>
>Alex Bates
>
>
If the matrices for ListPlot3D are all of the same dimensions (making a
list mats = {mat1, mat2, ..}) Then
m[t_]=Through/@Through[MapThread[Composition[Interpolation,List],mats,2][t]]
gives a function m which will interplolate the matrices.
Try it on
mats=Table[Random[Integer,{0,9}],{5},{6} ,{7}]
This can be used to generate a suitably close-spaced sequence of images
for smooth animation.
If the timing if the initial images is not equally spaced then it will
need to be included in the mati: {{h ...}...} will become
{{{t,h}...}...}
-------------------------------------------------------------
Allan Hayes
Training and Consulting
Leicester UK
http://www.haystack.demon.co.uk
hay at haystack.demon.co.uk
voice: +44 (0)116 271 4198
fax: +44(0)116 271 8642