matlab锥面的参数形式绘制,Matlab实验8 立体图形与动画

锥面的参数形式绘制,Matlab实验8 立体图形与动画"/>

matlab锥面的参数形式绘制,Matlab实验8 立体图形与动画

数学实验八

问题一：

1、当一个小圆轮在平面上滚动时，轮缘的一点在滚动时所形成的轨迹称为「摆线」。请用

MATLAB 画出一个典型的摆线，其中小圆轮的半径为1，而且至少要滚三圈。

%homework_8_1_1_2.m

hold on;

clear M;

a=linspace(0,6*pi,100);

t=linspace(0,2*pi,100);;

n=100;

x0=[0,0];

y0=[0,0];

axis equal;

axis([0,20,0,pi]);

fprintf('抓取画面中...\n');

for i=1:n

%x=a(i)+cos(t);

%y=1+sin(t);

x0(i)=a(i)-sin(a(i));

y0(i)=1-cos(a(i));

plot(x0,y0,'*');

M(i)=getframe;

end

fprintf('播放电影中...\n');

movie(M,3);

2、此题和上题类似。当一个小圆轮沿着一条曲线行进时，轮缘任一点的轨迹就会产生变化

丰富的摆线。假设小圆轮的半径r=2。

3、当小圆轮绕着一个大圆(半径R=5)的外部滚动时，请画出其摆线。

a=linspace(0,2*pi,100);

x0=[0,0];y0=[0,5];

fprintf('抓取画面中...\n');

for i=1:100

plot(5*cos(a),5*sin(a),'r');axis equal

hold on

x=6*sin(a(i))+cos(a);

y=6*cos(a(i))+sin(a);

x0(i)=6*sin(a(i))-sin(6*a(i));y0(i)=6*cos(a(i))-cos(6*a(i));

plot(x,y,'r',x0(i),y0(i),'b*');

hold on

plot(x0,y0,'b',6*sin(a(i)),6*cos(a(i)),'r');