mathematica 9用动画来演示产生旋转曲面的过程不能运行
来源:学生作业帮 编辑:神马作文网作业帮 分类:综合作业 时间:2024/11/07 07:48:10
mathematica 9用动画来演示产生旋转曲面的过程不能运行
m = 20;
For[i = 0,i 1,AxesLabel -> {"X","Y","Z"},
PlotPoints -> 30]]
m = 20;
For[i = 0,i 1,AxesLabel -> {"X","Y","Z"},
PlotPoints -> 30]]
……谁告诉你可以用这个方法来演示动画的?而且你的变量又没和图形的自变量相关联,怎么可能动?起码也这样吧?:
Animate[ParametricPlot3D[{Sin[z]*Cos[u], Sin[z]*Sin[u], z}, {z, 0, Pi}, {u, 0, i}, AspectRatio -> 1, AxesLabel -> {"X", "Y", "Z"}, PlotPoints -> 30], {i, 0, 2 Pi}]
————————
我明白了,你所看的大概是基于版本5甚至更早的版本的入门书吧?我想起来了.之前听人提过,在版本6之前,Mathematica的动态交互功能较弱,那时候的确存在一种使用For循环的制作动态图像的功能,但是那个方法在如今的版本里面已经行不通了.
如今如果想使用For循环来实现动态图功能,也不是不行,但是,就得这样:
i = 0; m = 80;
Dynamic@ParametricPlot3D[{Sin[z]*Cos[u], Sin[z]*Sin[u], z}, {z, 0, Pi}, {u, 0, i/m 2 Pi}, AspectRatio -> 1, AxesLabel -> {"X", "Y", "Z"}, PlotPoints -> 30]
For[i = 0, i
Animate[ParametricPlot3D[{Sin[z]*Cos[u], Sin[z]*Sin[u], z}, {z, 0, Pi}, {u, 0, i}, AspectRatio -> 1, AxesLabel -> {"X", "Y", "Z"}, PlotPoints -> 30], {i, 0, 2 Pi}]
————————
我明白了,你所看的大概是基于版本5甚至更早的版本的入门书吧?我想起来了.之前听人提过,在版本6之前,Mathematica的动态交互功能较弱,那时候的确存在一种使用For循环的制作动态图像的功能,但是那个方法在如今的版本里面已经行不通了.
如今如果想使用For循环来实现动态图功能,也不是不行,但是,就得这样:
i = 0; m = 80;
Dynamic@ParametricPlot3D[{Sin[z]*Cos[u], Sin[z]*Sin[u], z}, {z, 0, Pi}, {u, 0, i/m 2 Pi}, AspectRatio -> 1, AxesLabel -> {"X", "Y", "Z"}, PlotPoints -> 30]
For[i = 0, i
有卢瑟福用α粒子轰击金属箔实验的动画演示吗?
在几何画板中我想向学生演示一张图片先平移后旋转180度的动画,并设置可控按钮,该如何操作?
用mathematica软件在一张图里画一个曲面在一点的切平面,法线及曲面本身
英语翻译初中物理多媒体教学课件演示动画的设计
proe爆炸动画,销钉连接的两个零件不能平移,只能旋转
天空授课 中陀螺仪的旋转演示,
怎样用mathematica制作动画
这条Mathematica命令怎么运行的
关于分子生物学的一些动画演示在哪里能下载?比如DNA复制的动画,蛋白质合成的动画?
希望大家帮我用Mathematica编写一个动画
mathematica中绘制X=5的曲面
Mathematica 动画:用Mathematica画一个小球在一正弦曲线上运动