如何在Mathematica中导出3D动画？
如何在Mathematica中导出3D动画？
提问于 2013-11-23 16:10:01
我正在尝试在Mathematica中可视化分子振动，并使用如下命令制作一些3D动画：
Animate[Graphics3D[{x[t],y[t],z[t]}],{t,tmin,tmax}]我找不到出口的方法。有3D图形和2D动画的官方文档。我尝试了大多数文件类型，但都失败了。如果这是不可能的，那么从某个角度看2D gif是可以接受的。任何建议都会有所帮助。
回答 1
Stack Overflow用户
发布于 2013-11-24 00:14:55
这就行了。
In[1]:= x[t_]:=Sin[t];y[t_]:=Cos[t];z[t_]:=t;
plots = Table[
ParametricPlot3D[{x[a+t], y[a+t], z[a+t]}, {t,0,2 Pi}], {a,5}]
<<<snip plots>>>
In[4]:= ListAnimate[plots]
<<<snip animation>>>
In[5]:= Export["animate.avi", plots]
Out[5]= "animate.avi"
<<<find your file in your Mathematica folder and run your exported animation>>>所有这些都只是模仿http://reference.wolfram.com/mathematica/howto/ImportAndExportAnimations.html中的第二个示例
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/20160103
复制相关文章
相似问题
腾讯云开发者
