clear

x=linspace(0,2*pi,100);
y=sin(x);

figure(1)
plot(x,y,'ro')
hold on
y2=2.*sin(x).*cos(x);
plot(x,y2,'m','Linewidth',2) 
hold off
grid %pone la cuadricula de fondo
grid %quita la cuadricula de fondo
axis([0 2*pi -1 1])
set(gca,'XTick',0:pi/2:2*pi)
set(gca,'XTicklabel',{'0','p/2','p','3p/2','2p'})
%Cambiar la fuente de los ejes a Symbol
axis off %quita los ejes
axis on  % los vuelve a poner

xlabel('x=angulo en radianes'),ylabel('y')
legend('sin(x)','sin(2x)')
title('y=sin(x), y=sin(2x)')

figure(2)
subplot(2,3,1)
plot(x,y,'g+')
subplot(2,3,2)
plot(x,y,'r--')
subplot(2,3,3)
plot(x,y,'co')
subplot(2,3,4)
plot(x,y,'k')
subplot(2,3,5)
plot(x,y,'bs')
subplot(2,3,6)
plot(x,y,'m:')

figure(3)
t=linspace(0,2*pi,100)
fill(cos(t),sin(t),'r') %pinta una circunferencia rellena de color rojo

figure(4)
t=linspace(0,6*pi,100);
plot3(sin(t),cos(t),t,'Linewidth',4)