function dibujaEjemplo


    
    figure;
    hold on

    
    
    %ccordenadas de un cuadrado des de la primera esquina y regresa a ella
    x = [0 1 1 0 0];
    y = [0 0 1 1 0];
    h = line(x,y); % une con lineas lo que hay en x y x
    set(h,'Color', [1 0 0]) % poner la linea  pintada en el comando anterior de color rojo
    
    % un mensaje
    text(1.5,0.5,'?Hola!')
    
    % circulo verde de radio 2.5 en coordenadas 
    circle(1.5,2,2.5,'g')

    hold off

    % poner los ejes X y Y de -5 a 5 
    axis([-5 5 -5 5])
    % poner la misma escala para los 2 ejes
    axis equal


end


function circle(x,y,r,color)
%x and y are the coordinates of the center of the circle
%r is the radius of the circle
%0.01 is the angle step, bigger values will draw the circle faster but
%you might notice imperfections (not very smooth)
ang=0:0.01:2*pi; 
xp=r*cos(ang);
yp=r*sin(ang);
plot(x+xp,y+yp,color);
end