function[xx]=sin_vs_tay(n)
%% funkcja rysuje wykresy przybli¿en do n tego elementu rozwiniecia taylora
%% funkcji sinus dla przedzialu od 0 do 2*pi
cla;
for ii=(1:n),
   for jj=(0:20*pi),
        xx(jj+1,ii+1)=taylor(jj*0.1,ii);
   end
   hold on;
end
plot(0:0.1:2*pi,xx(:,:),'-');
fplot('2*sin(x) ',[0 2*pi],'.-r');
hold off;