echo on
% Este script muestra graficos de la función seno y coseno 
% en el intervalo [-2 pi,2 pi].
%
% Pulse <ENTER> para continuar
pause

x = [-2*pi:0.1:2*pi];
y = sin(x);
plot(x,y)
title('Grafico de la funcion seno entre  -2 pi  y  2 pi')

% En el grafico de la funcion seno se observa que el mismo pasa 
% por el origen y que la función es impar.
% Pulse <ENTER> para continuar
pause

% agreguemos una grilla para ver si efectivamente el gráfico pasa
% por el origen
% Pulse <ENTER> para continuar
pause

grid

% Si, efectivamente, el grafico pasa por el origen

% Ahora graficaremos el coseno
% Pulse <ENTER> para continuar
pause

z = cos(x);
plot(x,z)
title('Grafico de la funcion coseno entre  -2 pi  y  2 pi')
grid

% Podemos observar en el gráfico que la función coseno vale 1 en 0
% y que la misma es par

% FIN. Pulse <ENTER> para finalizar
pause