实验1 给定函数x)=5+58x 5+x2+x3+x (1)画出 f 在区间 [44] 上的 (2)画出区间[44+f(x)与cim)(x)的图形。 程序: fxl=(5+x^2+x^3+x^4)(5+5x+5x^2) gl=Plot[fx]x 4, 4), Plotstyle->RGBColor[1,0,0 AspectRatio->Automatic] 结果: 程序 g2=Plot[ Sinx]fx](x,- 4, 4) Plotstyle->RGBColor[0, 1,0] AspectRatio->Automatic Showlgl, g2 结果
实验1 给定函数 (1)画出 在区间 上的图形; (2)画出区间 上 与 的图形。 程序: 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], AspectRatio->Automatic]; 结果: 程序: g2=Plot[Sin[x]f[x],{x,-4,4}, PlotStyle->RGBColor[0,1,0], AspectRatio->Automatic]; Show[g1,g2]; 结果:
实验2观察函数 sIn 1的图形 程序: Plot[Sin[1/x],x,-1, 1), AspectRatio->Automatic] 结果
实验2 观察函数 的图形。 程序: Plot[Sin[1/x],{x,-1,1}, AspectRatio->Automatic]; 结果:
实验3(参数方程图形)绘出以下参数方程图形 x()=2cost x()=2(t-sint) y(t)=2sin't y(t)=2(1-cost) 程序: xl[t=2Cos[t]3 yI[t=2Sin[t] 3 ParametricPlot[(xl[tyl[t,,t, 0, 2Pi) AspectRatio->Automatic] 结果 程序: x2t=(t-Sin[tD); y2[t]=2(1-Cos[t]) ParametricPlot[ (x2[tl,y2[t,,t, 0, 4Pi) spectRatio->Automatic]
实验3(参数方程图形)绘出以下参数方程图形 程序: x1[t_]=2Cos[t]^3; y1[t_]=2Sin[t]^3; ParametricPlot[{x1[t],y1[t]},{t,0,2Pi}, AspectRatio->Automatic]; 结果: 程序: x2[t_]=2(t-Sin[t]); y2[t_]=2(1-Cos[t]); ParametricPlot[{x2[t],y2[t]},{t,0,4Pi}, AspectRatio->Automatic];
结果 实验4(极坐标图形)心形线、三叶玫瑰线。 程序: rlt ] =1-Cos[t] ParametricPlot[r[ Cos[t], r[tSin[t,t, 0, 2P1) AspectRatio->Automatic] 结果: 程序: rt]: =2Cos 3t ParametricPlot[r[t]Cos[t], r[tSin[t]i, t,0, 2Pi]
结果: 实验4(极坐标图形)心形线、三叶玫瑰线。 程序: r[t_]:=1-Cos[t]; ParametricPlot[{r[t]Cos[t],r[t]Sin[t]},{t,0,2Pi}, AspectRatio->Automatic]; 结果: 程序: r[t_]:=2Cos[3t]; ParametricPlot[{r[t]Cos[t],r[t]Sin[t]},{t,0,2Pi}
AspectRatio->Automatic] 结果 实验5(分段函数图形) x sIn x≠0 程序 fx: =-x2Sin[ 1/x; xI=0 fx]:=0/:x=0: Pot[x],{x,-1,1} 结果:
AspectRatio->Automatic]; 结果: 实验5(分段函数图形) 程序: f[x_]:=x^2Sin[1/x]/;x!=0; f[x_]:=0/;x=0; Plot[f[x],{x,-1,1}]; 结果: