x=[-13.140000:0.500000:3.140000];
y=[-0.542684 -0.073563 0.413569 0.799445 0.989589 0.937447 0.655785 0.213565 -0.280944 -0.706668 -0.959375 -0.977193 -0.755761 -0.349292 0.142696 0.599747 0.909959 0.997381 0.840610 0.478028 -0.001592 -0.480822 -0.842330 -0.997606 -0.908634 -0.597196 -0.139543 0.352274 0.757842 0.977865 0.958471 0.704411 0.277886 ];
plot(x,y,'g*-');title('GRAFICA DEL seno(x)');xlabel('Valores de x');
print -djpg 'graficaSeno.jpg'