1
$\begingroup$

This question already has an answer here:

How can I control the speed of the animation? I would like the frames to pass one value per second, in others words, one frame per second. Is there any function that controls this output?

g = Graphics[Table[{ Text[ Style[#, FontSize -> 40, Bold, Red], {0, 0}]}, 1]] & /@ Range[10]   
  Export["C:\\Users\\JohnPeter\\Desktop\\Count.gif", g]

enter image description here

$\endgroup$

marked as duplicate by Edmund, corey979, yohbs, C. E., Mr.Wizard Oct 6 '16 at 19:52

This question has been asked before and already has an answer. If those answers do not fully address your question, please ask a new question.

  • 3
    $\begingroup$ Export["count.gif", g, "DisplayDurations" -> 1] $\endgroup$ – Jason B. Oct 6 '16 at 16:53
  • 2
    $\begingroup$ Use the option "DisplayDurations" of Export.See this ref/format/GIF->Elements $\endgroup$ – yode Oct 6 '16 at 16:55
  • $\begingroup$ @yode - but that documentation is confusing since it only says that those are advance Import elements, not saying anything about Export $\endgroup$ – Jason B. Oct 6 '16 at 16:56
  • $\begingroup$ @JasonB Yes,some other string options confuse me as well.Hard to find in its documentation. $\endgroup$ – yode Oct 6 '16 at 16:59
3
$\begingroup$

Based on the JasonB comment

One frame in $0,5sec$:

g = Graphics[ Table[{Text[Style[#, FontSize -> 40, Bold, Red], {0, 0}]}, 1]] & /@ Range[10] Export["C:\\Users\\Leandro\\Documents\\Wolfram Mathematica\\1 - \ NB\\anima.gif", g, "DisplayDurations" -> 0.5]

enter image description here

One frame in $1sec$:

g = Graphics[ Table[{Text[Style[#, FontSize -> 40, Bold, Red], {0, 0}]}, 1]] & /@ Range[10] Export["C:\\Users\\Leandro\\Documents\\Wolfram Mathematica\\1 - \ NB\\anima.gif", g, "DisplayDurations" -> 1] 

enter image description here

$\endgroup$

Not the answer you're looking for? Browse other questions tagged or ask your own question.