% script rungeView.m
% 
% to show the curves of the Runge function and its derivative 
% 
% callee function : runge 
% 

% Xiaobai Sun 
% 

 n = 100; 
 x = linspace(-1,1, 2*n+1)' * 5; 
 
 [y, y1] = runge(x); 

 subplot(2,1,1) 
 plot( x, y, 'b'); 
 title('The Runge function over [-5,5]') ;
 
 subplot(2,1,2) 
 plot(x, y1, 'r') ; 
 title('The derivative of the Runge function over [-5,5]') ;
 
