MathGroup Archive 2007

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

Search the Archive

ListAnimate and GIF format saving

  • To: mathgroup at smc.vnet.net
  • Subject: [mg83495] ListAnimate and GIF format saving
  • From: "nilaakash at gmail.com" <nilaakash at gmail.com>
  • Date: Wed, 21 Nov 2007 03:04:37 -0500 (EST)

Hi,
     I am sending a small code (in Mathematica 6.0). Here data plots
as animation and I want to save as a .gif file.
I have saved as an .avi file but its size is huge (~37Mb). Is it
possible to save as .gif or any other movie type file within ~2Mb
size ?

Please reply.
Thanks.


a = 0.33; b = 0.22; c = 353;
f = a (1 - x/c)^b;
data = Table[{x, f}, {x, 352.5, 300, -0.5}];

p = ListAnimate[
  Table[ListPlot[Take[data, i], Frame -> True, Axes -> False,
    Mesh -> All, ImageSize -> 500,
    PlotRange -> {{353, 300}, {0.075, 0.22}}], {i, Length[data]}],
  AnimationRepetitions -> 2]

Export["test.avi", p, "AVI"];


With regards.
nilaakash


  • Prev by Date: Re: Scalars Instead of Lists with One Element
  • Next by Date: Re: Scalars Instead of Lists with One Element
  • Previous by thread: Re: Bug with LaplaceTransform?
  • Next by thread: Re: ListAnimate and GIF format saving