早教吧 育儿知识 作业答案 考试题库 百科 知识分享

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