clear

%dibujo de la funcion sin(x)

teta_grad=linspace(0,360,50)
teta_rad=funcion_grados_radianes(teta_grad) %pasa de grados a radianes
figure(1)
plot(teta_rad,sin(teta_rad))

%ejemplo de fzero
raiz=fzero('sin',0.1);