《显示与合并所绘的图形》由会员分享，可在线阅读，更多相关《显示与合并所绘的图形（25页珍藏版）》请在金锄头文库上搜索。
1、Ch06 顯示與合併所繪的圖形 with(plots); g1:=plot(cos(exp(x/2),x=-2*Pi.2*Pi): g2:=plot(sin(x),x=-2*Pi.2*Pi,thickness=5): display(g1,g2,axes=BOXED); display(g1,style=POINT); g3:=plot3d(2*exp(-sqrt(x2+y2),x=- 6.6,y=-6.6): g4:=plot3d(sin(sqrt(x2+y2),x=-6.6,y=- 6.6): display(g3,g4); display(g4,axes=FRAMED); 把繪圖選項變為
2、預設值 with(plots): setoptions(thickness=3,axes=BOXED); plot(sin(2*x)/(x2+1),x=-6.6); plot(sin(ln(x)*x),x=0.6); setoptions(thickness=0,axes=NORMAL); 等式繪圖 with(plots): inequal(2*x-5*y0,2*x+3*y+90, 8*x+3*y- 27=0,y=0; inequal(neweqs,x=-6.8,y=-10.10, optionsexcluded=(color=wheat), optionsopen=(color=red),a
3、xes=BOXED); 資點的繪圖 with(plots): pts:=seq(I,ln(i),i=1.12); pointplot(pts); pts:=seq(t/5*cos(t/5),t/5*sin(t/5),2*t/5, t=0.200): pointplot3d(pts,symbol=CIRCLE, color=RED); 空間曲線繪圖 with(plots): spacecurve(cos(t),sin(t),t,t=0.8*Pi, numpoints=200); spacecurve(3*cos(t),3*sin(t),t,t=0.12*Pi, 2+t*cos(t),2+t*si
4、n(t),t,t=0.10*Pi, numpoints=200); 極座標 圓柱座標與球面座標繪圖 with(plots): polarplot(sin(3*t),t=0.Pi,axes=NORMAL, scaling=CONSTRAINED); cylinderplot(z*sin(t)+t*sin(2*t),t=0.2*Pi, z=0.2,grid=60,60,style=PATCHNOGRID, axes=NORMAL); sphereplot(1,theta=0.2*Pi,phi=0.Pi, scaling=CONSTRAINED,axes=FRAMED); 隱含繪圖 with(plo
5、ts): eqn:=x2+y2=1; sol:=solve(eqn,x); plot(sol,y=-1.1, scaling=CONSTRAINED); implicitplot(eqn,x=-1.1,y=-1.1, scaling=CONSTRAINED); implicitplot(x2+y)2=x2-y2-1/60, x=- 3.3,y=-3.3,grid=100,100); implicitplot3d(x2/2+y2+z2=1, x=-2.2, y=-1.1, z=-1.1, grid=12,12,12); implicitplot3d(x2+y2-z2=1, x=-4.4, y=-
6、 4.4, z=-3.3, grid=20,20,20, style=PATCHNOGRID, axes=NORMAL, orientation=55,28); 等高線繪圖與密圖 with(plots): expr:=6*x/(x2+y2+1); plot3d(expr, x=-6.6, y=-6.6, axes=FRAME, orientation=-119,37); densityplot(expr, x=-6.6, y=-6.6, grid=60,60, style=PATCHNOGRID, axes=BOXED); contourplot(expr, x=-6.6, y=-6.6, c
7、ontour=-2.7, -2,-1,1,2,2.7, grid=50,50, thickness=2); display(%,%); contourplot(expr, x=-10.10, y=-6.6, filled=true, grid=50,50, coloring=white,wheat, axes=BOXED); contourplot3d(expr, x=-6.6, y=-4.4, axes=FRAME, orientation=-124,67); contourplot3d(expr, x=-6.6, y=-4.4, axes=FRAME, orientation=-124,6
8、7, filled=true, coloring=navy,pink); 在圖內加上文字 with(plots): textplot(2,2,”a+b”); textplot(-1,-1,”a+b”, 1,1,”(a+b)2”); g1:=textplot(2,0.2,”sin(2*x)/(x2+1)”, align=RIGHT,ABOVE): g2:=plot(sin(2*x)/(x2+1), x=-6.6): display(g1,g2); textplot3d(1,2,3,”textplot3d”, 1,- 1,1,”sin(2*x+y)”, color=red, axes=FRAME)
9、; plot3d(sin(2*x+y), x=-1.2, y=-1.2); display(%,%, orientation=159,47); 繪圖 with(plots): pts:=seq(i2, i=1.10); listplot(pts); listplot(pts, style=POINT); seq(i/2, sin(i/2), i=1.12); listplot(%, style=POINT); 向場與梯場的繪圖 with(plots): fieldplot(sin(2*x*y), cos(2*x-y), x=-2.2, y=-2.2, arrows=SLIM, axes=BOX
10、ED, grid=30,30); gradplot(sin(x)*cos(y), x=-2.2, y=-2.2, arrows=SLIM, axes=BOXED); gradplot3d(z*sin(x)+cos(y), x=-Pi.Pi, y=- Pi.Pi, z=0.2, arrows=SLIM, axes=BOXED, grid=6,6,6); fieldplot3d(sin(2*x*y), cos(2*x-y), sin(z), x=-Pi.Pi, y=-Pi.Pi, z=0.2, arrows=SLIM, axes=FRAME, grid=12,12,6); 複繪圖 with(plo
11、ts): complexplot(x+2*x*I, x=0.10); complexplot(sinh(3+x*I), x=-Pi.Pi, scaling=CONSTRAINED); complexplot3d(sech(z), z=-2-3*I.2+3*I, axes=FRAME); complexplot3d(GAMMA(z), z=-2.5-2*I.4+2*I, view=0.6, grid=35,35, linestyle=2, orientation=-132,76, axes=FRAME); 圓管繪圖 with(plots): tubeplot(t/4, cos(t), sin(t
12、), t=0.4*Pi, radius=0.5); tubeplot(2+t*cos(t), 2+t*sin(t), t, t=0.5.5*Pi, radius=4, grid=124,16); tubeplot(cos(t), sin(t), 0, t=0.4*Pi, radius=0.25*(t-Pi), tubepoints=20); 製作二維曲線動畫 with(plots): animatecurve(sin(x), x=-2*Pi.2*Pi, frames=40); animatecurve(sin(x), x, x=-4.4, numpoints=100, frames=100);
13、 animatecurve(sin(3*x), x, x=0.Pi, coords=polar, numpoints=50, frames=30, tickmarks=0,0, scaling=CONSTRAINED); Animatecurve(cos(3*x), sin(2*x), x=0.2*Pi, frames=30, numpoints=125); 平面與體動畫製作 with(plots): animate(cos(u)*sin(t), t=0.2*Pi, u=0.2*Pi, frames=80); animate(sin(t), sin(u)*cos(t), t=0.2*Pi, u
14、=0.Pi, coords=polar, numpoints=60, frames=60); animate(sin(u*t), t, t=0.2*Pi, u=0.8, coords=polar, frames=140, numpoints=200, tickmarks=0,0, scaling=CONSTRAINED); animate3d(sin(u)*cos(x)*sin(y), x=-Pi.Pi, y=-Pi.Pi, u=0.2*Pi, frame=36); animate3d(1.1)x*sin(u*y), x=-1.2*Pi, y=0.Pi, u=1.4, coords=spherical, frames=52);
