查看单个帖子
旧 2009-01-04, 15:16   #1
rnames
初级会员
 
注册日期: 2009-01-04
年龄: 38
帖子: 3
声望力: 0
rnames 正向着好的方向发展
难过 [求助]关于三叶线动画问题

包着询问的态度来的,是不是不太好~~

原题目是
编写使红色小球沿三叶线 运动的程序。

我的程序如下:
function f=clw_contrail(K,ki)
clc,clf;
sita=0:0.01:2*pi;y=cos(3*sita);
polar(sita,y,'g');axis off;hold on;
h=line(sita(1),y(1));
set(h,'Color',[1 0 0],'Marker', '.', 'MarkerSize',40,'EraseMode','xor');
n=length(sita);i=2;j=1;hold off;
while 1
hold on;polar(sita,y,'g');
h=line(sita(i),y(i));set(h,'Color',[1 0 0],'Marker', '.', 'MarkerSize',40,'EraseMode','xor');
drawnow;hold off; % <22>
pause(0.0001) % <23>
i=i+1;
if nargin==2 & nargout==1
if(i==ki&j==1);f=getframe(gcf);end % <26>
end
if i>n
i=1;j=j+1;
if j>K;break;end
end
end

但是出现了小球的痕迹一直存在的问题,是因为使用hold on,但是如果不使用hold on就无法实现小红球与三叶线同时存在的情况,



:lovely: :lovely: ,怎么办哎
rnames 当前离线   回复时引用此帖