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

来源:学生作业帮助网 编辑:作业帮 时间:2024/10/02 18:40:16
Mathematica 动画:用Mathematica画一个小球在一正弦曲线上运动
x)M,HM,LNTxڵz>e8PɎ';V=|B9+gk?ݳMw @6IET6QΆ43x1B"bay9%`~pF~y{QbAFfrqsfQrNjtuNpf^tElQXa@N~IPb^zBuyN")iΌթԁ(# ]#LQk_\g "C

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}]