m a t l a b中线性拟合程
序
Document serial number【NL89WT-NY98YT-NC8CB-NNUUT-NUT108】
clear all;
x=0:9;
y=[2 3.4 5.6 8 11 12.3 13.8 16 18.8 19.9];
plot(x,y,'r*') %画离散点数据
h=lsline %最小二乘拟合
p=polyfit(x,y,1); %线性拟合
sx=poly2str(1:2,'x');
[sx,len]=poly2str(p,'x'); %获得直线方程
disp('显示线性直线等式:');
poly2str(p,'x'); %生成多项式
y1=polyval(p,x); %获得x点处对相应的y值
plot(x,y,'r*',x,y1,'b'); %画出离散点和拟合曲线xlabel('墨水浓度');
ylabel('吸光度'); %x、y轴表示
legend('实验数据','拟合曲线');
grid on%绘上网格
p,sx