%《MATLAB及其在理工課程中的應用指南》第六章例6－1－3程序
% 用曲線擬合數據
% 西安電子科技大學出版社出版  陳懷琛編著 1999年10月初版，2004年11月第二版
%
clear,
datax = [1:5]'; datay=[ 0.2339, 0.3812, 0.5759, 0.8153, 0.9742 ]';  % 原始數據
A = [datax , ones(5,1)]; B = datay; a = A\B, r=1/a(1)	            % 線性擬合
set(gcf,'color','w')                % 置圖形背景色為白色
plot(datax,datay,'o'),hold on	    % 繪出原始數據點圖
xi=0:0.1:5; yi=a(1)*xi+a(2);        % 設置51個取值點
A1 = datax,  a0 = A1 \ B,		    % 通過原點的線性擬合
plot(xi,yi,xi,a0*xi,':')		    % 繪圖
N=length(datax); A2=[datax.^2, datax ,ones(N,1)]; a2=A2\B	        % 二次擬合
plot(xi,a2(1)*xi.^2+a2(2)*xi+a2(3),'--')	                        % 繪二次擬合曲線
hold off