Question

导出到动画gif似乎在Mathematica 8.0.1中有所改变？

我通常只需编写一个动画的动画GIF：

v=Manipulate[....]

then Export["foo.gif",v];

但现在它不起作用。我只得到一张静态图像。

以下是一个例子：

v=Manipulate[
Text[t],
{{t,4,"start"},0,10,1,ControlType->Trigger,AnimationRate->1,AnimationRepetitions->10}
]

现在Export["foo.gif",v]只生成静态图像，因为没有运行。

但Export["foo.avi",v]有效，它确实会生成一部正在播放的AVI电影。

此外，我曾经使用过动画GIF选项，但现在不支持：

Export["foo.gif",v,ConversionOptions->{"AnimationDisplayTime"->0.5,"Loop"->True},ImageSize->{500,500}]

Export::convoptobs: ConversionOptions is obsolete.

当我去帮忙时，我看不到GIF的选项。如何控制动画延迟等？

我认为这里有人可能会有一个想法。

感谢 --Nasser

Answer 1

您可以将Table导出为动画GIF。

v = Table[Panel[Text[t]], {t, 0, 10, 1}];
Export["anim.gif", v, "DisplayDurations" -> 0.5]

如果你绝对希望动画看起来像Manipulate，你可以这样做。

v = Table[Manipulate[Text[t], 
    {{t, Mod[k, 10], "start"}, 0, 10, 1, ControlType -> Trigger}],
  {k, 4, 14}];
Export["Manip.gif", v, "DisplayDurations" -> 0.5]

Answer 2

您可以使用v = Animate[ Text[t], {{t, 4, "start"}, 0, 10, 1, ControlType -> Trigger, AnimationRate -> 1, AnimationRepetitions -> 10}]

如何生成Manipulate的动画GIF？ 8.0.1

2 个答案: