曲線擬合的最小二乘法c語言
① 急~~~~~~!!!求解!用C語言編寫最小二乘法求數據的擬合曲線~並做出圖顯示擬合效果!高分懸賞!
#include<stdio.h>
#include<math.h>
void Guass(int n,float Array[][10])
{
float s,u;
int i,j,k,a,x,y;
for(i=0;i<n-1;i++)
{
s=Array[i][i];
k=i;
for(a=i+1;a<n;a++)
{
if(fabs(s) < fabs(Array[a][i]))
{
s=Array[a][i];
k=a;
}
}
if(k!=i)
{
for(j=i;j<n+1;j++)
{
u=Array[i][j];Array[i][j]=Array[k][j];Array[k][j]=u;
}
}
for(x=i+1;x<n;x++)
{
u=Array[x][i]/s;
for(y=i;y<n+1;y++)
{
Array[x][y]=Array[x][y]-u*Array[i][y];
}
}
}
for(x=n-1;x>=0;x--)
{
s=0;
for(y=x+1;y<n;y++)
s=s+Array[x][y]*Array[y][n];
Array[x][n]=(Array[x][n]-s)/(Array[x][x]);//得到結果
}
for(i=0;i<n;i++)printf("%f ",Array[i][n]);printf("\n");
}
int main()
{
int n,i,j;
float Array[10][10];
scanf("%d",&n);
for(i=0;i<n;i++)
{
for(j=0;j<n+1;j++)
scanf("%f",&Array[i][j]);
}
Guass(n,Array);
return 0;
}
你的串號我已經記下,採納後我會幫你製作
② 求C或C++語言編寫的用最小二乘法進行曲線擬合
你的近似解析表達式為y=at+bt^2+ct^2
是不是想寫成為y=at+bt^2+ct^3
但是實際擬合出來的表達式為y=a[3]+a[2]t+a[1]t^2+a[0]t^3會有個常數項的。
簡單的講,所謂擬合是指已知某函數的若干離散函數值{f1,f2,…,fn},通過調整該函數中若干待定系數f(λ1, λ2,…,λ3), 使得該函數與已知點集的差別(最小二乘意義)最小。如果待定函數是線性,就叫線性擬合或者線性回歸(主要在統計中),否則叫作非線性擬合或者非線性回歸。表達式也可以是分段函數,這種情況下叫作樣條擬合。
曲線擬合:
#include <stdio.h>
#include <stdlib.h>
#include <malloc.h>
#include <math.h>
Smooth(double *x,double *y,double *a,int n,int m,double *dt1,double *dt2,double *dt3);
void main()
{
int i ,n ,m ;
double *x,*y,*a,dt1,dt2,dt3,b;
n = 12;// 12個樣點
m = 4; //3次多項式擬合
b = 0; //x的初值為0
/*分別為x,y,a分配存貯空間*/
x = (double *)calloc(n,sizeof(double));
if(x == NULL)
{
printf("內存分配失敗\n");
exit (0);
}
y = (double *)calloc(n,sizeof(double));
if(y == NULL)
{
printf("內存分配失敗\n");
exit (0);
}
a = (double *)calloc(n,sizeof(double));
if(a == NULL)
{
printf("內存分配失敗\n");
exit (0);
}
for(i=1;i<=n;i++)
{
x[i-1]=b+(i-1)*5;
/*每隔5取一個點,這樣連續取12個點*/
}
y[0]=0;
y[1]=1.27;
y[2]=2.16;
y[3]=2.86;
y[4]=3.44;
y[5]=3.87;
y[6]=4.15;
y[7]=4.37;
y[8]=4.51;
y[9]=4.58;
y[10]=4.02;
y[11]=4.64;
/*x[i-1]點對應的y值是擬合已知值*/
Smooth(x,y,a,n,m,&dt1,&dt2,&dt3); /*調用擬合函數*/
for(i=1;i<=m;i++)
printf("a[%d] = %.10f\n",(i-1),a[i-1]);
printf("擬合多項式與數據點偏差的平方和為:\n");
printf("%.10e\n",dt1);
printf("擬合多項式與數據點偏差的絕對值之和為:\n");
printf("%.10e\n",dt2);
printf("擬合多項式與數據點偏差的絕對值最大值為:\n");
printf("%.10e\n",dt3);
free(x); /*釋放存儲空間*/
free(y); /*釋放存儲空間*/
free(a); /*釋放存儲空間*/
}
Smooth(double *x,double *y,double *a,int n,int m,double *dt1,double *dt2,double *dt3)//(x,y,a,n,m,dt1,dt2,dt3 )
//double *x; /*實型一維數組,輸入參數,存放節點的xi值*/
//double *y; /*實型一維數組,輸入參數,存放節點的yi值*/
//double *a; /*雙精度實型一維數組,長度為m。返回m一1次擬合多項式的m個系數*/
//int n; /*整型變數,輸入參數,給定數據點的個數*/
//int m; /*整型變數,輸入參數,擬合多項式的項數*/
//double *dt1; /*實型變數,輸出參數,擬合多項式與數據點偏差的平方和*/
//double *dt2; /*實型變數,輸出參數,擬合多項式與數據點偏差的絕對值之和*/
//double *dt3; /*實型變數,輸出參數,擬合多項式與數據點偏差的絕對值最大值*/
{
int i ,j ,k ;
double *s,*t,*b,z,d1,p,c,d2,g,q,dt;
/*分別為s ,t ,b分配存貯空間*/
s = (double *)calloc(n,sizeof(double));
if(s == NULL)
{
printf("內存分配失敗\n");
exit (0);
}
t = (double *)calloc(n,sizeof(double));
if(t == NULL)
{
printf("內存分配失敗\n");
exit (0);
}
b = (double *)calloc(n,sizeof(double));
if(b == NULL)
{
printf("內存分配失敗\n");
exit (0);
}
z = 0;
for(i=1;i<=n;i++)
z=z+x[i-1]/n; /*z為各個x的平均值*/
b[0]=1;
d1=n;
p=0;
c=0;
for(i=1;i<=n;i++)
{
p=p+x[i-1]-z;
c=c+y[i-1];
}
c=c/d1;
p=p/d1;
a[0]=c*b[0];
if(m>1)
{
t[1]=1;
t[0]=-p;
d2=0;
c=0;
g=0;
for(i=1;i<=n;i++)
{
q=x[i-1]-z-p;
d2=d2+q*q;
c=y[i-1]*q+c;
g=(x[i-1]-z)*q*q+g;
}
c=c/d2;
p=g/d2;
q=d2/d1;
d1=d2;
a[1]=c*t[1];
a[0]=c*t[0]+a[0];
}
for(j=3;j<=m;j++)
{
s[j-1]=t[j-2];
s[j-2]=-p*t[j-2]+t[j-3];
if(j>=4)
for(k=j-2;k>=2;k--)
s[k-1]=-p*t[k-1]+t[k-2]-q*b[k-1];
s[0]=-p*t[0]-q*b[0];
d2=0;
c=0;
g=0;
for(i=1;i<=n;i++)
{
q=s[j-1];
for(k=j-1;k>=1;k--)
q=q*(x[i-1]-z)+s[k-1];
d2=d2+q*q;
c=y[i-1]*q+c;
g=(x[i-1]-z)*q*q+g;
}
c=c/d2;
p=g/d2;
q=d2/d1;
d1=d2;
a[j-1]=c*s[j-1];
t[j-1]=s[j-1];
for(k=j-1;k>=1;k--)
{
a[k-1]=c*s[k-1]+a[k-1];
b[k-1]=t[k-1];
t[k-1]=s[k-1];
}
}
*dt1=0;
*dt2=0;
*dt3=0;
for(i=1;i<=n;i++)
{
q=a[m-1];
for(k=m-1;k>=1;k--)
q=q*(x[i-1]-z)+a[k-1];
dt=q-y[i-1];
if(fabs(dt)>*dt3)
*dt3=fabs(dt);
*dt1=*dt1+dt*dt;
*dt2=*dt2+fabs(dt);
}
/*釋放存儲空間*/
free(s);
free(t);
free(b);
return(1);
}
③ 用C語言進行最小二乘法擬合,這個代碼錯在哪
a=(10.0*sumxy-sumx*sumy)/(10.0*sum-sumx*sumx); /*帶入a=(NΣxy-ΣxΣy)/(NΣx^2(Σx)^2)
NΣx^2(Σx)^2 這邊中間到底有沒有減號?你注釋裡面沒有減號,但是代碼10.0*sum-sumx*sumx中是減法,你看看這邊是否有問題
④ 最小二乘法 C程序演算法
聯系我,我可以把幾種擬合方式的代碼法給你
⑤ 幾個最小二乘的曲線擬合的C/C++語言代碼
曲線擬合的最小二乘法
如有實驗數據如下
求x=55處的近似值 並畫出圖形
x 0 10 20 30 40 50 60 70 80 90
y 68 67.1 66.4 65.6 64.6 61.8 61.0 60.8 60.4 60
#include "stdio.h"
#include "graphics.h"
double s(double x[],double y[],double x1)
{
double a,b,tmp1=0,tmp2=0,tmp3=0,tmp4=0,result;
int i=0;
for(;i<10;i++)
{
tmp1+=x[i]*x[i];
tmp2+=y[i];
tmp3+=x[i];
tmp4+=x[i]*y[i];
}
b=(tmp1*tmp2-tmp3*tmp4)/(10*tmp1-tmp3*tmp3);
a=(10*tmp4-tmp2*tmp3)/(10*tmp1-tmp3*tmp3);
result=a*x1+b;
return result;
}
void hzbz(int x,int y)
{
int i,j;
line(0,y,1024,y);
moveto(x-200,y);
j=x-200;
for(i=0;i<100;i++)
{
if(i%5!=0)
lineto(j,y-5);
else
lineto(j,y-8);
j=j+10;
moveto(j,y);
}
line(x,768,x,0);
moveto(x,y+200);
j=y+640;
for(i=0;i<300;i++)
{
if(i%5!=0)
lineto(x+5,j);
else
lineto(x+8,j);
j=j-10;
moveto(x,j);
}
line(x,0,x-8,6);
line(x,0,x+8,6);
line(640,y,634,y-8);
line(640,y,634,y+8);
}
void main()
{
double x[]={0,10,20,30,40,50,60,70,80,90};
double y[]={68,67.1,66.4,65.6,64.6,61.8,61.0,60.8,60.4,60};
int graphdriver=DETECT,graphmode;
int i;
printf("x=55\ny=%lf\n",s(x,y,55));
getch();
initgraph(&graphdriver,&graphmode, "");
setbkcolor(BLUE);
hzbz(200,200);
moveto(200,200);
for(i=0;i<200;i++)
lineto(i+200,-s(x,y,i)+200);
getch();
closegraph();
}
⑥ 求最小二乘曲線的擬合的C語言程序
曲線擬合的最小二乘法
如有實驗數據如下
求x=55處的近似值 並畫出圖形
x 0 10 20 30 40 50 60 70 80 90
y 68 67.1 66.4 65.6 64.6 61.8 61.0 60.8 60.4 60
#include "stdio.h"
#include "graphics.h"
double s(double x[],double y[],double x1)
{
double a,b,tmp1=0,tmp2=0,tmp3=0,tmp4=0,result;
int i=0;
for(;i<10;i++)
{
tmp1+=x[i]*x[i];
tmp2+=y[i];
tmp3+=x[i];
tmp4+=x[i]*y[i];
}
b=(tmp1*tmp2-tmp3*tmp4)/(10*tmp1-tmp3*tmp3);
a=(10*tmp4-tmp2*tmp3)/(10*tmp1-tmp3*tmp3);
result=a*x1+b;
return result;
}
void hzbz(int x,int y)
{
int i,j;
line(0,y,1024,y);
moveto(x-200,y);
j=x-200;
for(i=0;i<100;i++)
{
if(i%5!=0)
lineto(j,y-5);
else
lineto(j,y-8);
j=j+10;
moveto(j,y);
}
line(x,768,x,0);
moveto(x,y+200);
j=y+640;
for(i=0;i<300;i++)
{
if(i%5!=0)
lineto(x+5,j);
else
lineto(x+8,j);
j=j-10;
moveto(x,j);
}
line(x,0,x-8,6);
line(x,0,x+8,6);
line(640,y,634,y-8);
line(640,y,634,y+8);
}
void main()
{
double x[]={0,10,20,30,40,50,60,70,80,90};
double y[]={68,67.1,66.4,65.6,64.6,61.8,61.0,60.8,60.4,60};
int graphdriver=DETECT,graphmode;
int i;
printf("x=55\ny=%lf\n",s(x,y,55));
getch();
initgraph(&graphdriver,&graphmode, "");
setbkcolor(BLUE);
hzbz(200,200);
moveto(200,200);
for(i=0;i<200;i++)
lineto(i+200,-s(x,y,i)+200);
getch();
closegraph();
}
⑦ 用C語言擬合三角函數最小二乘法求實現代碼
火熱機會圖褲褲盈虧開會研究與昆明
⑧ 曲線擬合 最小二乘法 C語言程序
去翻一下,計算方法或者數值分析的書吧。有公式,你按那公式求就可以了。
一樓用的是列主元消去法(跟高斯消去法差不多,就多了一個選主元(絕對值最大))
對於解AX=b,平方根法要求A是對稱且正定矩陣
由於平方根法裡面要計算根號,計算量就比較大,而且工程中的A不一定都是正定的。所以在工程中採用改進的平方根法(它解出來的解與真解有一點誤差,但是相當相近),也就是說A只要對稱就行了。
⑨ 最小二乘法c程序(個曲線擬合的問題,高手請指點)要求x是二次的!!)
請注意你的X的倒數第二個和倒數第三個可能寫錯了,應該是1.008,1.064吧?
如果不是這樣,誤差就很大了;
如果是這樣,那麼算出來的二次曲線是y = -10.263x2 + 34.745x - 0.3469;
看到你這么具體地給出一組數字,大概是需要具體結果而不是通用程序吧,我是直接用EXCEL擬合的,沒寫程序,不知道能滿足你的需要嗎;