fg1=figure;
set(fg1,'NumberTitle','off')
set(fg1,'Name','Example graph');
% title('First program.', 'FontSize',16)
% text(30,5,'First program')
axis off
x=0;
while x<1
    set(fg1,'Color',[x 0 0])
    pause(0.01)
%     set(fg1,'Color',[0 1 0])
%     pause(0.2)
%     set(fg1,'Color',[0 0 1])
%     pause(0.2)
x=x+0.01;
end

pause(1)

delete(fg1);
% text(30,5,'First program')
% while 1
%     set (fg1,'Position',[160 78 360 250])
%     pause(0.2)
%     set (fg1,'Position',[360 278 360 250])
%     pause(0.2)
% end

% fg2=figure;
% title('Second figure')
% axis off
% 
% delete(fg1)
% delete(fg2)
% x=[0 1 2]
% y=[1 2 3]
% 
% patch(x,y)