clear all;
close all;
clc;
ts=0.1;
t=30;
for k=1:1:t/ts
times(k)=k*ts;
xd(k)=2*sin(0.25*k*ts);
yd(k)=2*sin(0.5*k*ts);
end
figure(1);
for k=1:3:length(xd)
axis([-2.5 2.5 -3 3]);
plot(xd(k),yd(k),'bs','MarkerSize',16);
hold on;
pause(0.1);
end