16

导出为动画 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 的选项。如何控制动画延迟等？

我想这里有人可能有想法。

谢谢——纳赛尔

4

2 回答 2

21

您可以将 a 导出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]
于 2011-05-24T13:11:25.530 回答
4

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

于 2011-05-24T11:48:32.807 回答