for i=1:2:40
x=linspace(-5*pi,5*pi,30000)
y=sin(x)
plot(x,y,'r-')
hold on
syms x y
y=sin(x)
f=taylor(y,x,0,'Order',i)
h=ezplot(f,[-5*pi,5*pi])
axis([-5*pi,5*pi,-1.2,1.2])
set(h,'Color','b')
pause(0.5)
hold off
end