Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
1998
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 1998

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

Search the Archive

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




  • Prev by Date: Re: Disappearing variables
  • Next by Date: Animations on mathematica
  • Previous by thread: Animation
  • Next by thread: Re: Method to eliminate NIntegrate warning