【mathematica导出sin的动态图】

看图

代码(加注释)(符号都是英文状态下)

a(*设置函数的名字*)= 
 Table[Plot[Sin[n + x](*函数*), {x, 0, 2 Pi}(*定义域*), 
   AxesOrigin -> {0, 0}(*设置原点坐标*)], {n, -20, 
   20}(*这个动态图总共40帧*)];(*加分号表示运行时不显示结果*)
Export["e:/数模导出的图片等/sin.gif"(*导出文件的路径*), 
a(*要保存的函数名字*)];(*加分号表示运行时不显示结果*)

纯代码(符号都是英文状态下)

a=Table[Plot[Sin[n + x], {x, 0, 2 Pi}, 
   AxesOrigin -> {0, 0}], {n, -20, 
   20}];
Export["e:/数模导出的图片等/sin.gif", \
a];

阅读更多
想对作者说点什么?

博主推荐

换一批

没有更多推荐了,返回首页