练习5参考程序.docVIP

练习5参考程序

编写质点沿正弦曲线运动轨迹的动画。

t=0:0.001:4*pi;

y=sin(t);

p=0.1

comet(t,y,p);

编写质点沿三维螺旋曲线运动轨迹的动画。

clear;

t=0:0.001:4*pi;

x=t;

y=sin(t);

z=cos(t)+y;

comet3(x,y,z);

运用句柄图形的方法编写以下程序：建立一个窗口，设为红色，关闭标题数，窗口名为EX1；建立一正弦曲线对象，设为粉色[10.51]，线宽为2；最后取得颜色属性。

clear;

clfreset;

H_fig=figure(1);

set(H_fig,color,red,NumberTitle,off,Name,EX1);

x=0:pi/50:2*pi;

y=sin(x);

H_sin=plot(x,y);

set(H_sin,color,[10.51],linewidth,2);

get(H_sin,color)

运用句柄图形的方法编写以下程序：建立一个窗口，设为浅蓝色[011]；建立一曲线对象，横坐标为：time=[2.53.07.5101317203040506070]，纵坐标为：res=[0.290.560.771.051.361.522.02.272.813.053.253.56]，曲线颜色为[011]，线宽为3。纵坐标范围[04]，横坐标标注time值。

clear;

clfreset;

time=[2.53.07.5101317203040506070];

res=[0.290.560.771.051.361.522.02.272.813.053.253.56];

Hf_fig=figure(1);

set(gcf,color,[011]);

Hf_axes=axes(Ylim,[04],Xtick,0:6:70,Xticklabel,time)

Hf_line=line(time,res)

set(Hf_line,color,[010],linewidth,3);

5.分别建立两个窗口，画出正弦与余下弦曲线，窗口和曲线采用不同颜色。

clear;

clf;

Hf_fig1=figure(1);

set(Hf_fig1,color,blue);

x=0:pi/50:2*pi;

y=sin(x);

Hf_sin=plot(x,y);

set(Hf_sin,color,[0.7501],linewidth,3);

Hf_fig1=figure(2);

set(Hf_fig1,color,red);

y=cos(x);

Hf_cos=plot(x,y);

set(Hf_cos,color,[010],linewidth,1);

6．建立单摆的实时动画程序。

clear;

clf;

axis([-12,12,-24,0]);

x=0;

y=0;

Hx_line1=line([0,x],[0,y],color,blue,erasemode,xor);

Hx_head=line(x,y,color,red,linestyle,.,erasemode,xor,markersize,[80]);

fori=1:10

fort=2*pi/3:pi/600:4*pi/3;

x=15*sin(t);

y=15*cos(t);

set(Hx_line1,xdata,[0,x],ydata,[0,y]);

set(Hx_head,xdata,x,ydata,y);

drawnow

end

fort=4*pi/3:-pi/600:2*pi/3

x=15*sin(t);

y=15*cos(t);

set(Hx_line1,xdata,[0,x],ydata,[0,y]);

set(Hx_head,xdata,x,ydata,y);

drawnow

end

end