Mathematica 动画:用Mathematica画一个小球在一正弦曲线上运动

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/11 05:18:30
Mathematica 动画:用Mathematica画一个小球在一正弦曲线上运动

Mathematica 动画:用Mathematica画一个小球在一正弦曲线上运动
Mathematica 动画:用Mathematica画一个小球在一正弦曲线上运动

Mathematica 动画:用Mathematica画一个小球在一正弦曲线上运动
7.0或8.0上运行
Manipulate[
Show[Graphics[Circle[{x,Sin[x]},.2],
PlotRange -> {{-7,7},{-1.3,1.3}}],
Plot[Sin[i],{i,-7,7},
PlotRange -> {{-7,7},{-1.3,1.3}}]],{x,-2*Pi,2*Pi}]