[数学实验-课程讲义.docVIP

2012年3月 数 学 实 验 Mathematics Experiment 实验一 一元函数及其图形 本实验的目的是通过图形来认识函数，并运用函数的图形来观察和分析函数的有关特性，建立数形结合的思想. Mathematica作图主要命令如下： 1.画散点图的命令为 ListPlot[{{x1,y1},{x2,y2},…{xn,yn}},选项] 或者 ListPlot[{y1,y2,…yn},选项] 命令ListPlot的选项主要有两个: (1) PlotJoined-True, 要求用折线将散点连接起来; (2) PlotStyle-PointSize[0.02], 表示散点的大小. 2.画区间[]上函数的图形的命令为 Plot[f,{x,a,b}] 3.画参数方程所表示曲线的图形的命令为 ParametricPlot[{f ,g},{t,a,b}] 4. 隐函数作图命令ImplicitPlot 这里同样要先打开作图软件包, 输入 Graphics\ImplicitPlot.m 命令为ImplicitPlot[隐函数方程, 自变量的范围, 作图选项] 1.1 函数及其图形 实验1 给定函数 (1) 画出在区间[-4,4]上的图形； （2）画出区间[-4,4]上与的图形. 解：(1) 输入 f[x_]=(5+x^2+x^3+x^4)/(5+5x+5x^2); g1=Plot[f[x],{x,-4,4},PlotStyle-RGBColor[1,0,0]] 输出 (2) 输入 g2=Plot[Sin[x]f[x],{x,-4,4},PlotStyle-RGBColor[0,1,0]] 输出 实验2 观察函数的图形. 解： 输入 Plot[Sin[1/x],{x,-1,1}]; 输出 从图中可以看到函数在附近来回振荡.请解释其原因. 实验3 （参数方程的图形）绘出以下参数方程的图形. 解：输入 x[t_]=2Cos[t]^3 ； y[t_]=2Sin[t]^3； ParametricPlot[{x1[t],y1[t]},{t,0,2Pi}] 输出 实验4 画出分段函数 的图形. 解： 输入 f[x]:=x^2Sin[1/x]/;x?0; f[x]:=0 /; x=0; Plot[f[x],{x,-0.8,0.8},PlotRange?{-0.08,0.08}] 输出 实验5 分别画出坐标为的散点图，并画出折线图. 解：输入 t1=Table[i^2,{i,10}]; g1=ListPlot[t1,PlotStyle?PointSize[0.02]]; g2=ListPlot[t1,PlotJoined?True]; Show[g1,g2] t2=Table[{i^2,4i^2+i^3},{i,10}]; g1=ListPlot[t2,PlotStyle?PointSize[0.02]]; g2=ListPlot[t2,5PlotJoined?True]; Show[g1,g2] 输出 1.2 函数性质的研究 给定二维曲线图形，如何判断一个图形是某一个函数的图形已在高等数学中介绍.若其是某一个函数的图形（一个,对应图形上的一点），我们如何从图形观察函数的单调性、奇偶性、周期性等？ 实验6 研究函数在区间[-2,2]上的图形特性. 解： 输入 Plot[x^5+3E^x+Log[3,3-x],{x,-2,2}] 输出 实验7 判断函数是否为周期函数？ 解： 输入 Plot[Sin[2Pi x]+Cos[2Pi x],{x,-4,4}] 输出 实验8 判断函数的反函数的存在性.若存在，求反函数的表达式，并画出其图形. 解：输入 Solve[y==x^3+3x^2+3x+1,x] 得反函数为 再输入 Plot[-1+x^(1/3),{x,-3,3}]; 输出 实验9 制作函数的图形动画，观察参数C对函数图形的影响. 解：输入 Manipulate[Plot[Sin[cx],{x,-Pi,Pi},PlotRange-{-1,1}],{c,1,4,1/3}] 输出 …… 1.3 关于函数图形的进一步研究 利用Mathematic