Exporting a manipulate function as a .gif

Question

How can I export this code:

Manipulate[Plot[a*Cos[2 Pi*x]*Exp[-(10^2)/x^2], {x, 0, 10}], {a, 1, 10}]

As a .gif that walks trough the values for $a$?

score 0 · Answer 1 · answered Apr 17 '18 at 13:01

0

Do something like this

pe = Flatten@
       Table[Manipulate[
         Plot[a*Cos[2 Pi*x]*Exp[-(10^2)/x^2], {x, 0, 10}], {{a, m1}, 1, 
          10}], {m1, 1, 10}];

Export["C:/tcdata/file.gif", pe]

answered Apr 17 '18 at 13:01

zhk

11,939
1
22
38

And how can I export it to a .avi video format with high quality? – Looper Apr 17 '18 at 13:11
@Looper Export["C:/tcdata/file.avi", pe] – zhk Apr 17 '18 at 13:12
@Looper type "avi" + hit F1. And so on. – Kuba Apr 17 '18 at 13:21

Exporting a manipulate function as a .gif

1 Answers1