% f = sin x
x = linspace( 0 , 2*pi , 1000 ) ;
plot( x , sin(x) , 'b' , 'LineWidth' , 1 ) ;
hold on ;
for i_max = 1 : 2 : 20
  y = serie_MacLaurin( x , @derivate_sin , i_max ) ;
  plot( x , y ) ;
  ylim([-2 2]) ;
  pause( 1 ) ;
end