Re: Re: How to save/export a Manipulate[...] run to a movie
- To: mathgroup at smc.vnet.net
- Subject: [mg78519] Re: [mg78385] Re: How to save/export a Manipulate[...] run to a movie
- From: Murray Eisenberg <murray at math.umass.edu>
- Date: Tue, 3 Jul 2007 05:38:30 -0400 (EDT)
- Organization: Mathematics & Statistics, Univ. of Mass./Amherst
- References: <f5vt33$lhr$1@smc.vnet.net> <200706290955.FAA12556@smc.vnet.net>
- Reply-to: murray at math.umass.edu
That way doesn't work for me. I get a large (~ 130MB) .avi file, but
when I view it I see only a single frame for the entire time.
dh wrote:
> Hi Nasser,
>
> a crude way to doit is to save the created graphics and finally store
>
> them e.g. in AVI format. However, mathematica is awfully fast and
>
> creates a lot of pictures. Therefore, it is best to put a Pause
>
> statement in to slow it down. Here is ane xample:
>
> tmp={};
>
> Manipulate[(AppendTo[tmp,t=Plot[Sin[x^a],{x,.1,1}]];Pause[0.1];t),{a,-1,1}]
>
> Export["d:/tmp/t.avi",tmp]
>
> hope this helps, Daniel
>
>
>
>
>
> Nasser Abbasi wrote:
>
>> Hello;
>
>
>> I have a small notebook which does a Manipulate[....], where I 'run'
>
>> it for some simulation time, and I need to save this run to a movie
>
>> file (format not important, quick time or avi etc....) so I can send
>
>> it to someone.
>
>
>> Is there a way to do this from within Mathematica other than doing a
>
>> recording screen capture of the window itself in which this command is
>
>> running in?
>
>
>> I know of course I could save this as a Mathematica .nbp file and have
>
>> someone run it inside Mathematica player. But I think it is simpler
>
>> if one can save an example run to a movie file first.
>
>
>> Any idea if this is possible to do from inside Mathematica? I looked
>
>> at the documentation, and I can't see any example of how to do this.
>
>
>> thanks,
>
>> Nasser
>
>
>
>
>
--
Murray Eisenberg murray at math.umass.edu
Mathematics & Statistics Dept.
Lederle Graduate Research Tower phone 413 549-1020 (H)
University of Massachusetts 413 545-2859 (W)
710 North Pleasant Street fax 413 545-1801
Amherst, MA 01003-9305