用C语言实现的曲线拟合的最小二乘法

实验名称：曲线拟合的最小二乘法实验目的了解曲线拟合的最小二乘法实验类型设计型实验环境WindowsXPTC实验内容其中yi=f(xi)o(x),,n(x)｝中相关知识：已知C[a,b]中函数f(x)的一组实验数据(xi,yi)(i=0,1，…,m)其中yi=f(xi)o(x),,n(x)｝中找函数f(x)曲线拟合的最小二乘解S*找函数f(x)曲线拟合的最小二乘解S*(x)najj0j(x)'其法方程(组)为:k,.)a.d(k0,1,,n)其中，(，)m(x)(x)(x)jk ijikii0(f,k)(xi)f(xi)k(xi)k=0,1,・..,n特别是，求函数f(x)曲线拟合的线性最小二乘解S*(x)axb的计算公式为TOC\o"1-5"\h\zCx2)Cy)rx)Cxy)i i iiib-^-9 i-0 ^-0 i-0 (m1)mx2 (mx)2i0 i0(m1)mxy(mx)(my)ii iia i-0 i-0 i-0(m1)mx2 (mx.)2i0 i0数据结构：两个一维数组或一个二维数组算法设计：(略)实验用例：已知函数y=f(x)的一张表：x0102030405060708090y6867.166.465.664.661.861.060.860.460试验要求：利用曲线拟合的线性最小二乘法求被逼近函数f(x)在点x=55处的近似值，并画出实验数据和直线。编写代码：#include<stdio.h>#include<stdlib.h>#include<graphics.h>doubleqiuhe1(doublea[10][2],intp)(inti;doubley;y=0;for(i=0;i<10;i++)y=y+a[i][p];returny;}doubleqiuhe2(doublea[10][2],intp)(inti;doubley=0;for(i=0;i<10;i++)y=y+a[i][0]*a[i][p];returny;}doublenihe(doublea[10][2],doublex)(doublea1,b,y;a1=(10*qiuhe2(a,1)-qiuhe1(a,0)*qiuhe1(a,1))/(10*qiuhe2(a,0)-qiuhe1(a,0)*qiuhe1(a,0));b=(qiuhe2(a,0)*qiuhe1(a,1)-qiuhe1(a,0)*qiuhe2(a,1))/(10*qiuhe2(a,0)-qiuhe1(a,0)*qiuhe1(a,0));y=a1*x+b;returny;}intmain()(doublea[10][2]={0,68,10,67.1,20,66.4,30,65.6,40,64.6,50,61.8,60,61.0,70,60.8,80,60.4,90,60};doublex,x1,q=1;charc[12];inti;longn;intarw[6]={515,235,520,240,515,245};intarw1[6]={315,45,320,40,325,45};intgdriver=IBM8514;intgmode=IBM8514HI;initgraph(&gdriver,&gmode,"c:\\TC20\\BGI");cleardevice();printf("inputx:\n");scanf("%lf",&x);printf("%f\n",nihe(a,x));n=nihe(a,x)*1000000+1;c[0]='y';c[1]='=';c[4]='.';for(i=10;i>1;i--)(if(i!=4)(c[i]=n%10+48;n=n/10;}c[11]='\0';x1=x;setbkcolor(7);setcolor(14);setlinestyle(0,0,3);drawpoly(3,arw);drawpoly(3,arw1);line(120,240,520,240);line(320,40,320,440);x=0;setcolor(2);setlinestyle(0,0,1);line((0+320),(int)(240-nihe(a,0)*q),(90+320),(int)(240-nihe(a,90)*q));setcolor(3);outtextxy(320,30,〃Y〃)；outtextxy(310,245,〃O〃)；outtextxy(525,240,〃X〃)；outtextxy((x1+330),((240-nihe(a,x1))-10),c);settextstyle(4,0,4);outtextxy(450,400,〃Nihe...〃)；for(i=0;i<=9;i++)putpixel((a[i][0]+320),(240-a[i][1]*q),11);setcolor(4);setlinestyle(1,0,1);line((x1+320),((240-nihe(a,x1)*q)-80),(x1+320),((240-nihe(a,x1)*q)+120));getch();closegraph();

}实验结果（测试用例、实验结果）实验总结与心得通过本次实验，对曲线拟合的最小二乘法有了更深刻的了解!概念最小二乘法多项式曲线拟合，根据给定的山个点，并不要求这条曲线精确地经过这些点，而是曲线y=f(x)的近似曲线尸=(P(x)。原理［原理部分由个人根据互联网上的资料进行总结，希望对大家能有用］给定数据点Pi(xi,yi),其中i=1,2，…,m。求近似曲线y=p(x)。并且使得近似曲线与y=f(x)的偏差最小。近似曲线在点pi处的偏差<5i=P(xi)-y,i=1,2,...,m。常见的曲线拟合方法:使偏差绝对值之和最小TOC\o"1-5"\h\zm m成= 尤I平i=i ；-]使偏差绝对值最大的最小minmax0|=|口（耳）一乂|使偏差平方和最小rri m°i=i ，=i按偏差平方和最小的原则选取拟合曲线，并且采取二项式方程为拟合曲线的方法,称为最小二乘法。推导过程：设拟合多项式为：y=nq+打ijt+….v、各点到这条曲线的距离之和，即偏差平方和如下：R--Z[-Vj」回+句耳中…十邮一寸｝]•1=1为了求得符合条件的a值，对等式右边求ai偏导数，因而我们得到了：Jr-2£"-㈣+mL“T+…+敏XA）|X=0/=JJr-2V*jV-[<70+flI.Y+...+fljt=0Jf1?Z[.V-HI-T+.…+血Xkj|F=0.

将等式左边进行一下化简，然后应该可以得到下面的等式:把这些等式表示成矩阵的形式，就可以得到下面的矩阵:nS=L…S=j^+l3|.rk■-Kr■nr.z=ie:SwJt+l4j=l■■-57=1峪..瓦.S=i-甘yi.将这个范德蒙得矩阵化简后可得到:也就是说X*A=Y，那么A=(X'*X)-1*X'*Y便得到了系数矩阵A，同时，我们也就得到了拟合曲线。实现运行前提：Python运行环境与编辑环境；Matplotlib.pypl^OJ形库，可用于快速绘制2D图表，与matlab中的plo偷令类似，而且用法也基本相同。代码：[python]viewplaincopy

#coding=utf-82.作者:JairusChan程序:多项式曲线拟合算法'''importmatplotlib.pyplotaspltimportmathimportnumpyimportrandom11.fig=plt.figure()ax=fig.add_subplot(111)14.#阶数为9阶order=917.#生成曲线上的各个点x=numpy.arange(-1,1,0.02)y=[((a*a-1)*(a*aT)*(a*aT)+0.5)*numpy.sin(a*2) forainx]#ax.plot(x,y,color='r',linestyle='-',marker='')#,label="(a*aT)*(a*aT)*(a*aT)+0.5”23.#生成的曲线上的各个点偏移一下，并放入到xa,ya中去i=0xa=[]ya=[]forxxinx:yy=y[i]d=float(random.randint(60,140))/100#ax.plot([xx*d],[yy*d],color='m',linestyle='',marker='.')i+=1xa.append(xx*d)ya.append(yy*d)35.'''''foriinrange(0,5):xx=float(random.randint(-100,100))/100yy=float(random.randint(-60,60))/100xa.append(xx)ya.append(yy)'''41.ax.plot(xa,ya,color='m',linestyle='',marker='.')43.44.#进行曲线拟合matA=[]foriinrange(0,order+1):matA1=[]forjinrange(0,order+1):tx=0.0forkinrange(0,len(xa)):tx=0.0forkinrange(0,len(xa)):51.52.53.54.55.56.57.dx=1.0forlinrange(0,j+i):dx=dx*xa[k]tx+=dxmatA1.append(tx)matA.append(matA1)58.#print(len(xa))#print(matA[0][0])matA=numpy.array(matA)62.matB=[]foriinrange(0,order+1):ty=0.0forkinrange(0,len(xa)):dy=1.0forlinrange(0,i):dy=dy*xa[k]ty+=ya[k]*dymatB.append(ty)72.matB=numpy.array(matB)74.matAA=numpy.linalg.solve(matA,matB)76.#画出拟合后的曲线#print(matAA)xxa=nu