Giáo trình Turbo C nâng cao và C++ - Chương 11: Nội suy và xấp xỉ hàm

//xap xi huu_ty; #include #include #include #include #define k 11 void main() { float x[k],y[k]; float a,b,a1,b1,c,d,e; int i,n,t;202 char ok; clrscr(); printf("PHUONG PHAP BINH PHUONG TOI THIEU"); printf("\n"); printf("So diem da cho n = "); scanf("%d",&n); for (i=1;i<=n;i++) { printf("x[%d] = ",i); scanf("%f",&x[i]); printf("y[%d] = ",i); scanf("%f",&y[i]); } printf("%4cBANG SO LIEU\n",' '); printf("%8cx%30cy\n",' ',' '); for (i=1;i<=n;i++) printf("%4c%8.4f%23c%8.4f\n",' ',x[i],' ',y[i]); ok=' '; t=1; flushall(); while (t) { printf("Co sua so lieu khong(c/k): "); scanf("%c",&ok); if (toupper(ok)=='C') { printf("Chi so cua phan tu can sua i = "); scanf("%d",&i); printf("Gia tri moi : "); printf("x[%d] = ",i); scanf("%f",&x[i]); printf("y[%d] = ",i); scanf("%f",&y[i]); flushall(); } if (toupper(ok)!='C') t=0;

pdf24 trang | Chia sẻ: hachi492 | Ngày: 07/01/2022 | Lượt xem: 397 | Lượt tải: 0download
Bạn đang xem trước 20 trang tài liệu Giáo trình Turbo C nâng cao và C++ - Chương 11: Nội suy và xấp xỉ hàm, để xem tài liệu hoàn chỉnh bạn click vào nút DOWNLOAD ở trên
180 Ch−ơng 11 : nội suy và xấp xỉ hàm Đ1.Nội suy Lagrange Trong thực tế nhiều khi phải phục hồi một hàm y = f(x) tại mọi giá trị x trong một đoạn [ a,b ] nào đó mà chỉ biết một số nhất định các giá trị của hàm tại một số điểm cho tr−ớc.Các giá trị này đ−ợc cung cấp qua thực nghiệm hay tính toán.Vì vậy nảy sinh vấn đề toán học là trên đoạn a ≤ x ≤ b cho một loạt các điểm xi ( i= 0,1,2..) và tại các điểm xi này giá trị của hàm là yi = f(xi) đã biết.Bây giờ ta cần tìm đa thức : Pn(x) = aox n + a1x n-1 + +an-1x + an sao cho Pn(xi) = f(xi) = yi.Đa thức Pn(x) đ−ợc gọi là đa thức nội suy của hàm y = f(x).Ta chọn đa thức để nội suy hàm y = f(x) vì đa thức là loại hàm đơn giản,luôn có đạo hàm và nguyên hàm.Việc tính giá trị của nó theo thuật toán Horner cũng đơn giản. Bây giờ ta xây dựng đa thức nội suy kiểu Lagrange.Gọi Li là đa thức : )xx)...(xx)(xx)...(xx( )xx)...(xx)(xx)...(xx( L ni1ii1ii0i n1i1i0 i −−−− −−−−= +− +− Rõ ràng là Li(x) là một đa thức bậc n và : ⎪⎩ ⎪⎨ ⎧ = ≠ = ij0 ij1 )x(L ji Ta gọi đa thức này là đa thức Lagrange cơ bản. Bây giờ ta xét biểu thức : ∑ = = n 0i iin )x(L)x(f)x(P Ta thấy Pn(x) là một đa thức bậc n vì các Li(x) là các đa thức bậc n và thoả mãn điều kiện Pn(xi) = f(xi) = yi.Ta gọi nó là đa thức nội suy Lagrange. Với n = 1 ta có bảng x x0 x1 y y0 y1 Đa thức nội suy sẽ là : P1(x) = yoL0(x) + y1L1(x1) 10 1 0 xx xx L − −= 01 0 1 xx xx L − −= nên 01 0 1 10 1 01 xx xx y xx xx y)x(P − −+− −= Nh− vậy P1(x) là một đa thức bậc nhất đối với x Với n = 2 ta có bảng x x0 x1 x2 y y0 y1 y2 Đa thức nội suy sẽ là : P2(x) = yoL0(x) + y1L1(x1) + y2L2(x2) )xx)(xx( )xx)(xx( L 2010 21 0 −− −−= )xx)(xx( )xx)(xx( L 2101 20 1 −− −−= 181 )xx)(xx( )xx)(xx( L 1202 10 2 −− −−= Nh− vậy P1(x) là một đa thức bậc hai đối với x Trên cơ sở thuật toán trên ta có ch−ơng trình tìm đa thức nội suy của một hàm khi cho tr−ớc các điểm và sau đó tính trị số của nó tại một giá trị nào đó nh− sau : Ch−ơng trình 11-1 #include #include #include #define max 21 int maxkq,n; float x[max],y[max],a[max],xx[max],yy[max]; float x0,p0; void main() { int i,k; char ok ; void vaosolieu(void); float lagrange(int,float [],float [],float); void inkq(void); clrscr(); printf("%24cNOI SUY DA THUC LAGRANGE\n",' '); vaosolieu(); k=0; ok='c'; while (ok=='c') { printf("Tinh gia tri cua y voi x la x0 = "); scanf("%f",&x0); p0=lagrange(n,x,y,x0); printf("Gia tri cua y = %15.5f\n",p0); printf("\n"); k=k+1; maxkq=k; xx[k]=x0; yy[k]=p0; flushall(); printf("Tinh tiep khong(c/k)?"); scanf("%c",&ok); } inkq(); 182 } void vaosolieu() { int i,t; char ok; printf("\n"); printf("Ham y = f(x)\n"); printf("So cap (x,y) nhieu nhat la max = 20\n"); printf("So diem da cho truoc n = "); scanf("%d",&n); for (i=1;i<=n;i++) { printf("x[%d] = ",i); scanf("%f",&x[i]); printf("y[%d] = ",i); scanf("%f",&y[i]); } printf("\n"); printf(" SO LIEU BAN VUA NHAP\n"); printf(" x y\n"); for (i=1;i<=n;i++) printf("%8.4f %8.4f\n",x[i],y[i]); ok=' '; t=1; flushall(); while (t) { printf("\nCo sua so lieu khong(c/k):?"); scanf("%c",&ok); if (toupper(ok)=='C') { printf("Chi so cua phan tu can sua i = "); scanf("%d",&i); printf("Gia tri moi : "); printf("x[%d] = ",i); scanf("%f",&x[i]); printf("y[%d] = ",i); scanf("%f",&y[i]); flushall(); } if (toupper(ok)!='C') t=0; } } float lagrange(int n,float x[max],float y[max],float x0) { int i,k; 183 float g0; p0=0.0; for (k=1;k<=n;k++) { g0=1.0; for (i=1;i<=n;i++) if (i!=k) g0=g0*(x0-x[i])/(x[k]-x[i]); p0=p0+y[k]*g0; } return(p0); } void inkq() { int i,j,k; printf("\n"); printf("%24cBANG SO LIEU\n",' '); printf("%18cx %24cy\n",' ',' '); for (i=1;i<=n;i++) printf("%20.4f %25.4f\n",x[i],y[i]); printf("\n"); printf("%24cKET QUA TINH TOAN\n",' '); printf("%14cx %10cy\n",' ',' '); for (k=1;k<=maxkq;k++) printf("%15.5f %15.5f\n",xx[k],yy[k]); getch(); } Giả sử ta có bảng các giá trị x,y : x 0 3 -2 2 4 y 0 -3.75 10 -2 4 vậy theo ch−ơng trình tại x = 2.5 y = -3.3549. Đ2.Nội suy Newton Bây giờ ta xét một cách khác để xây dựng đa thức nội suy gọi là ph−ơng pháp Newton.Tr−ớc hết ts đ−a vào một khái niệm mới là tỉ hiệu Giả sử hàm y = y(x) có giá trị cho trong bảng sau : x x0 x1 x2 xn-1 xn y y0 y1 y2 yn-1 yn Tỉ hiệu cấp 1 của y tại xi,xj là : 184 ji ji ji xx yy ]x,x[y − −= Tỉ hiệu cấp hai của y tại xi,xj,xk là : ki kjji kji xx ]x,x[y]x,x[y ]x,x,x[y − −= v.v. Với y(x) = Pn(x) là một đa thức bậc n thì tỉ hiệu cấp 1 tại x,x0 : 0 0nn 0n xx )x(P)x(P ]x,x[P − −= là một đa thức bậc (n-1).Tỉ hiệu cấp 2 tại x,x0,x1 : 1 10n0n 10n xx ]x,x[P]x,x[P ]x,x,x[P − −= là một đa thức bậc (n-2) v.v và tới tỉ hiệu cấp (n+1) thì : Pn[ x,xo,..,xn] = 0 Từ các định nghĩa tỉ hiệu ta suy ra : Pn(x) = Pn(x0) + ( x- x0)Pn[x,xo] Pn[x,x0] = Pn[x0,x1] + ( x- x1) Pn[x,xo,x1] Pn[x,xo,x1] = Pn[x0,x1,x2] + ( x- x2) Pn[x,xo,x1,x2] ............ Pn[x,xo,..,xn-1] = Pn[x0,x1,..,xn] + ( x- xn) Pn[x,xo,..,xn] Do Pn[ x,xo,..,xn] = 0 nên từ đó ta có : Pn(x) = Pn(x0) + (x - x0)Pn[xo,x1] + (x - x0)(x - x1)Pn[x0,x1,x2] + +(x - x0)(x - xn-1)Pn[x0,,xn] Nếu Pn(x) là đa thức nội suy của hàm y=f(x) thì : Pn(xi) = f(xi) = yi với i = 0 ữ n Do đó các tỉ hiệu từ cấp 1 đến cấp n của Pn và của y là trùng nhau và nh− vậy ta có : Pn(x) = y0 + (x - x0)y[x0,x1] + (x - x0)(x - x1)y[x0,x1,x2] +..+ (x - x0)(x - x1)...(x - xn-1)y[x0,..,xn] Đa thức này gọi là đa thức nội suy Newton tiến xuất phát từ nút x0 của hàm y = f(x).Ngoài đa thức tiến còn có đa thức nội suy Newton lùi xuất phát từ điểm xn có dạng nh− sau : Pn(x) = yn + (x - xn)y[xn,xn-1] + (x - xn)(x - xn-1)y[xn,xn-1,xn-2] +..+ (x - xn)(x - xn-1)...(x - x1)y[xn,..,x0] Tr−ờng hợp các nút cách đều thì xi = x0 +ih với i = 0,1,..,n.Ta gọi sai phân tiến cấp 1 tại i là : ∆yi = yi+1 - yi và sai phân tiến cấp hai tại i : ∆2yi = ∆(∆yi) = yi+2 - 2yi+1 + yi ......... và sai phân tiến cấp n là : ∆nyi = ∆(∆n-1yi) Khi đó ta có : h y ]x,x[y 010 ∆= h2 y ]x,x,x[y 20 2 210 ∆= ........... 185 )h!n( y ]x.,.,.x[y n0 n n0 ∆= Bây giờ đặt x = x0 + ht trong đa thức Newton tiến ta đ−ợc : y !n )1nt.(.).1t(t y !2 )1t(t yty)htx(P 0 n 0 2 000n ... ∆+−−∆−∆ ++++=+ thì ta nhận đ−ợc đa thức Newton tiến xuất phát từ x0 trong tr−ờng hợp nút cách đều.Với n =1 ta có : P1(x0+ht) = y0 + ∆y0 Với n =2 ta có : y 2 )1t(t yty)htx(P 0 2 0002 ∆−∆ ++=+ Một cách t−ơng tự ta có khái niệm các sai phân lùi tại i : ∇yi = yi - yi-1 ∇2yi = ∇(∇yi) = yi - 2yi-1 + yi-2 ......... ∇nyi = ∇(∇n-1yi) và đa thức nội suy Newton lùi khi các điểm nội suy cách đều : y !n )1nt.(.).1t(t y !2 )1t(t yty)htx(P n n n 2 nn0n ... ∇−++∇+∇ ++++=+ Ví dụ : Cho hàm nh− bảng sau : x 0.1 0.2 0.3 0.4 y 0.09983 0.19867 0.29552 0.38942 Ta tính giá trị của hàm tại 0.14 bằng đa thức nội suy Newton vì các mốc cách đều h = 0.1.Ta có bảng sai phân sau : i x y ∆y ∆2y ∆3y 0 0.1 0.09983 0.09884 1 0.2 0.19867 - 0.00199 0.09685 -0.00096 2 0.3 0.29552 - 0.00295 0.09390 3 0.4 0.38942 Ta dùng công thức Newton tiến với điểm gốc là x0 = 0.1.h = 0.1.Với x = 0.14 ta có 0.14 = 0.1 + 0.1t nên t = 0.4 và kết quả là : 13954336.000096.0 !3 )2t)(1t(t 00199.0 !2 )1t(t 099884.0.t09983.0)t1.01.0(P =−−−−++=+ Ch−ơng trình nội suy Newton nh− sau : Ch−ơng trình 11-2 186 //Noi suy Newton #include #include #include #define max 11 void main() { int i,j,k,n,t; float a[max],b[max],x[max],y[max]; char ok; float x0,p; clrscr(); printf("So diem da cho n = "); scanf("%d",&n); for (i=1;i<=n;i++) { printf("x[%d] = ",i); scanf("%f",&x[i]); printf("y[%d] = ",i); scanf("%f",&y[i]); } printf("%10cBANG SO LIEU\n",' '); printf("%8cx%30cy\n",' ',' '); for (i=1;i<=n;i++) printf("%4c%8.4f%23c%8.4f\n",' ',x[i],' ',y[i]); ok=' '; t=0; flushall(); while (t) { printf("Co sua so lieu khong(c/k): "); scanf("%c",&ok); if (toupper(ok)=='C') { printf("Chi so cua phan tu can sua i = "); scanf("%d",&i); printf("Gia tri moi : "); printf("x[%d] = ",i); scanf("%f",&x[i]); printf("y[%d] = ",i); scanf("%f",&y[i]); flushall(); } if (toupper(ok)!='C') t=0; } a[1]=y[1]; for (j=1;j<=n-1;j++) 187 { for (i=1;i<=n-j;i++) y[i]=(y[i+1]-y[i])/(x[i+j]-x[i]); a[j+1]=y[1]; } b[n]=a[n]; for (k=n-1;k>=1;k--) { for (j=n-1;j>=1;j--) b[j]=a[j] ; for (i=n-1;i>=k;i--) a[i]=a[i]-b[i+1]*x[k]; } for (i=n;i>=1;i--) printf("He so bac %d la :%8.4f\n",i-1,a[i]); printf("\n"); k=0; ok='c'; flushall(); while (ok=='c') { printf("Tinh gia tri cua y tai x = "); scanf("%f",&x0); p=0; for (k=n;k>=1;k--) p=p*x0+a[k]; printf("Tri so noi suy tai x0 = %4.2f la : %10.5f\n",x0,p); getch(); printf("Ban co muon tinh tiep cac diem khac khong(c/k)"); do scanf("%c",&ok); while ((ok!='c')&&(ok!='k')); } } Dùng ch−ơng trình này nội suy các giá trị cho trong bảng sau 0 0.2 0.4 0.6 0.8 1.0 1 1.2214027 6 1.4918247 1.8221188 2.2255409 3 2.7182818 3 ta có các hệ số của đa thức nội suy : 0.0139(bậc 5),0.0349(bậc 4),0.1704(bậc3),0.4991(bậc 2),1.0001(bậc 1) và 1.0000(bậc 0). Đ3.Nội suy Aitken Một dạng khác của đa thức nội suy đ−ợc xác định bằng thuật toán Aitken.Giả sử ta có n điểm đã cho của hàm f(x).Nh− vậy qua hai điểm x0 và x1 ta có đa thức nội suy Lagrange của hàm f(x) đ−ợc viết d−ới dạng : 188 01 11 00 01 xx xxy xxy )x(P − − − = là một đa thức bậc 1 : 01 0 1 10 1 001 xx xx y xx xx y)x(P − −+− −= .Khi x = x0 thì : 0 01 011 000 001 yxx xxy xxy )x(P =− − − = Khi x = x1 thì : 1 01 111 100 101 yxx xxy xxy )x(P =− − − = Đa thức nội suy Lagrange của f(x) qua 3 điểm x0,x1,x2 có dạng : 02 212 001 012 xx xx)x(P xx)x(P )x(P − − − = và là một đa thức bậc 2: )xx)(xx( )xx)(xx( y )xx)(xx( )xx)(xx( y )xx)(xx( )xx)(xx( y)x(P 1202 10 2 2101 20 1 2010 21 0012 −− −−+−− −−+−− −−= Khi x = x0 thì : 0 02 0212 000 0012 yxx xx)x(P xxy )x(P =− − − = Khi x = x1 thì : 1 02 121 101 1012 yxx xxy xxy )x(P =− − − = Khi x = x2 thì : 2 02 222 20201 2012 yxx xxy xx)x(P )x(P =− − − = Tổng quát đa thức nội suy Lagrange qua n điểm là : 02 nn..12 0)1n..(01 n..012 xx xx)x(P xx)x(P )x(P − − − = − Nh− vậy ta có thể dùng phép lặp để xác định lần l−ợt các đa thức Lagrange.Sơ đồ tính toán nh− vậy gọi là sơ đồ Neville-Aitken. Ví dụ : Cho các cặp điểm (0,0.4),(1.4,1.5),(2.6,1.8),(3.9,2.6),tính y tại x=2 189 97143.1 04.1 6.05.1 24.0 xx xxy xxy )x(P 01 11 00 01 =− − − =− − − = 65.1 4.16.2 6.08.1 6.05.1 xx xxy xxy )x(P 12 22 11 12 =− − =− − − = 7242.1 06.2 6.065.1 297143.1 xx xx)x(P xx)x(P )x(P 02 212 001 012 =− − =− − − = 4308.1 6.29.3 9.16.2 6.08.1 xx xxy xxy )x(P 23 33 22 23 =−=− − − = 5974.1 4.19.3 9.14308.1 6.065.1 xx xx)x(P xx)x(P )x(P 13 323 112 123 =− − =− − − = 6592.1 09.3 9.15974.1 27242.1 xx xx)x(P xx)x(P )x(P 03 3123 0012 0123 =− − =− − − = Ch−ơng trình đ−ợc viết nh− sau Ch−ơng trình 11-3 //Noi suy Aitken #include #include #include #define max 11 void main() { float x[max],y[max],yd[max]; float x1; int j,k,n,n1; clrscr(); printf("Cho so diem da co n = "); scanf("%d",&n1); n=n1-1 ; for (k=0;k<=n;k++) { printf("x[%d] = ",k+1); scanf("%f",&x[k]); printf("y[%d] = ",k+1); scanf("%f",&y[k]); } printf("Cho diem can tinh gia tri cua ham x1 = "); 190 scanf("%f",&x1); for (k=0;k<=n-1;k++) { yd[k]=(y[k]*(x1-x[k+1])-y[k+1]*(x1-x[k]))/(x[k]-x[k+1]); if (k!=0) for (j=k-1;j>=0;j--) yd[j]=(yd[j]*(x1-x[k+1])-yd[j+1]*(x1-x[j]))/(x[j]-x[k+1]); } printf("Gia tri ham tai x = %6.3f la y = %8.4f\n",x1,yd[0]); getch(); } Dùng ch−ơng trình này để nội suy các cặp số (1,3),(2,5),(3,7),(4,9) và (5,11) tại x = 2.5 ta có y = 6. Đ4.Xấp xỉ hàm bằng ph−ơng pháp bình ph−ơng bé nhất Trong các mục tr−ớc ta đã nội suy giá trị của hàm.Bài toán đó là cho một hàm d−ới dạng bảng số và phải tìm giá trị của hàm tại một giá trị của đối số không nằm trong bảng. Trong thực tế,bên cạnh bài toán nội suy ta còn gặp một dạng bài toán khác.Đó là tìm công thức thực nghiệm của một hàm.Nội dung bài toán là từ một loạt các điểm cho tr−ớc (có thể là các giá trị của một phép đo nào đó) ta phải tìm một hàm xấp xỉ các giá trị đã cho.Ta sẽ dùng ph−ơng pháp bình ph−ơng tối thiểu để giải bài toán.Giả sử có mẫu quan sát (xi,yi ) của hàm y = f(x).Ta chọn hàm f(x) có dạng : f(x) = a0f0(x) + a1f1(x) + a2f2(x)... (1) Trong đó các hàm f0(x),f1(x),f2(x) v.v.là (m+1) hàm độc lập tuyến tính mà ta có thể chọn tuỳ ý và các hệ số ai là tham số ch−a biết mà ta phải xác định dựa vào hệ hàm đã chọn và các điểm quan sát.Sai số giữa trị đo đ−ợc và trị tính theo (1) là : ei = yi - f(xi) (2) Sai số này có thể âm hay d−ơng tuỳ từng giá trị của yi.Khi dùng ph−ơng pháp bình ph−ơng bé nhất ta xét bình ph−ơng của sai số tại một điểm : [ ]2ii2i )x(fye −= (3) Với n điểm tổng bình ph−ơng của sai số sẽ là : [ ]{ }∑∑ == +⋅⋅⋅++−== n 1i 2 inni11i00i n 1i 2 i )x(fa)x(fa)x(fayeS Rõ ràng S là hàm của các giá trị cần tìm ai.và chúng ta sẽ chọn các ai sao cho S đạt giá trị min,nghĩa là các đạo hàm ia S ∂ ∂ phải bằng không.Ta sẽ xét các tr−ờng hợp cụ thể. 1.Hàm xấp xỉ có dạng đa thức : Trong tr−ờng hợp tổng quát ta chọn hệ hàm xấp xỉ là một đa thức,nghĩa là : f(x) = a0 + a1x + a2x 2 +...+ amx m Vậy hàm S là : ( )2m210i xaxaxaayS +⋅⋅⋅+++−= Theo điều kiện đạo hàm 0 a S i =∂ ∂ ta nhận đ−ợc hệ ph−ơng trình: 191 ⎪⎪ ⎪⎪ ⎪⎪ ⎩ ⎪⎪ ⎪⎪ ⎪⎪ ⎨ ⎧ =+⋅⋅⋅++ ⋅⋅⋅ =+⋅⋅⋅++ =+⋅⋅⋅++ =+⋅⋅⋅++ =+⋅⋅⋅++ ∑∑∑ ∑ ∑∑∑ ∑ ∑∑∑ ∑ ∑∑∑ ∑ ∑∑ ∑ === = − − === = + − + === = + − + === = − + == = − − n 1i i m i n 1i m i0 n 1i n 1i 1m2 i1m m2 im n 1i i 3 i n 1i 3 i0 n 1i n 1i 2m i1m 3m im n 1i i 2 i n 1i 2 i0 n 1i n 1i 1m i1m 2m im n 1i ii n 1i i0 n 1i n 1i m i1m 1m im n 1i i0 n 1i n 1i 1m i1m m im yxxaxaxa yxxaxaxa yxxaxaxa yxxaxaxa ynaxaxa Đây là một hệ ph−ơng trình tuyến tính.Giải nó ta nhận đ−ợc các gía trị ai.Sau đây là ch−ơng trình viết theo thuật toán trên. Ch−ơng trình 11-4 //Xap xi da thuc #include #include #include #define max 11 void main() { int i,j,k,m,n,p,kp,t; float a[max],x[max],y[max],y1[max]; float b[max][max]; char ok; float s,sx,s1,c,d; clrscr(); printf("PHUONG PHAP BINH PHUONG TOI THIEU"); printf("\n"); printf("Cho bac cua da thuc xap xi m = "); scanf("%d",&m); printf("So diem da cho n = "); scanf("%d",&n); for (i=1;i<=n;i++) { printf("x[%d] = ",i); scanf("%f",&x[i]); printf("y[%d] = ",i); scanf("%f",&y[i]); } x[0]=1; printf("\n"); printf("%4cBANG SO LIEU\n",' '); 192 printf("%8cx%30cy\n",' ',' '); for (i=1;i<=n;i++) printf("%4c%8.4f%20c%8.4f\n",' ',x[i],' ',y[i]); ok=' '; t=1; flushall(); while (t) { printf("Co sua so lieu khong(c/k): "); scanf("%c",&ok); if (toupper(ok)=='C') { printf("Chi so cua phan tu can sua i = "); scanf("%d",&i); printf("Gia tri moi : "); printf("x[%d] = ",i); scanf("%f",&x[i]); printf("y[%d] = ",i); scanf("%f",&y[i]); flushall(); } if (toupper(ok)!='C') t=0; } //for (i=0;i<=n;i++) //a[i]=0.0; printf("\n"); printf("CAC GIA TRI DA CHO"); printf("\n"); printf("X = "); for (i=1;i<=n;i++) printf("%c%8.3f",' ',x[i]); printf("\n"); printf("Y = "); for (i=1;i<=n;i++) printf("%c%8.3f",' ',y[i]); printf("\n"); for (p=0;p<=m;p++) { y1[p]=0.0; for (i=1;i<=n;i++) { sx=1.0; for (j=1;j<=p;j++) sx*=x[i]; y1[p]+=y[i]*sx; } } for (p=0;p<=m;p++) for (k=0;k<=m;k++) 193 { kp=k+p; b[p][k]=0.0; for (i=1;i<=n;i++) { sx=1.0; for (j=1;j<=kp;j++) sx*=x[i]; b[p][k]+=sx; } } for (i=0;i<=m-1;i++) { c=1.0/b[i][i]; for (k=i+1;k<=m;k++) { d=b[i][k]; for (j=i+1;j<=m;j++) b[k][j]-=b[i][j]*c*d; y1[k]-=y1[i]*c*d; b[i][k]*=c; } y1[i]*=c; } y1[m]/=b[m][m]; for (i=m-1;i>=0;i--) for (j=i+1;j<=m;j++) y1[i]-=b[i][j]*y1[j]; printf("\n"); printf("CAC HE SO CUA DA THUC CAN TIM"); printf("\n"); for (i=0;i<=m;i++) printf("a[%d] = %10.5f\n",i,y1[i]); getch(); } Với các giá trị x,y đo đ−ợc theo bảng x 7 8 9 10 11 12 13 y 7,4 8,4 9,1 9,4 9,5 9,5 9,4 ta có n = 7 và chọn m = 2 và tính đ−ợc theo ch−ơng trình các hệ số : a0 = -0.111905 ; a1 = 2.545238 ; a2 = -4.857143 và hàm xấp xỉ sẽ là : f(x) = -0.111905 + 2.545238x -4.857143x2 2.Hàm dạng Aecx : Khi các số liệu thể hiện một sự biến đổi đơn điệu ta dùng hàm xấp xỉ là y = Aecx.Lấy logarit hai vế ta có : lny = lnA + cxlne 194 Theo điều kiện đạo hàm 0 a S i =∂ ∂ ta có hệ ph−ơng trình : ⎪⎪⎩ ⎪⎪⎨ ⎧ =+ =+ ∑ ∑∑ ∑ ∑ = == = = n 1i n 1i ii n 1i i 2 i n 1i n 1i ii ylnxxAlnxc ylnAlnnxc Giải hệ ph−ơng trình này ta có các hệ số A và c : Ch−ơng trình 11-5 //xap_xi_e_mu; #include #include #include #include #define max 11 void main() { int i,n,t; float x[max],y[max]; char ok; float a,b,c,d,e,f,d1,d2,d3; clrscr(); printf("PHUONG PHAP BINH PHUONG TOI THIEU"); printf("\n"); printf("So diem da cho n = "); scanf("%d",&n); for (i=1;i<=n;i++) { printf("x[%d] = ",i); scanf("%f",&x[i]); printf("y[%d] = ",i); scanf("%f",&y[i]); } x[0]=1.0; printf("%4cBANG SO LIEU\n",' '); printf("%8cx%30cy\n",' ',' '); for (i=1;i<=n;i++) printf("%4c%8.4f%23c%8.4f\n",' ',x[i],' ',y[i]); ok=' '; t=1; while (t) { printf("Co sua so lieu khong(c/k): "); scanf("%c",&ok); if (toupper(ok)=='C') { 195 printf("Chi so cua phan tu can sua i = "); scanf("%d",&i); printf("Gia tri moi : "); printf("x[%d] = ",i); scanf("%f",&x[i]); printf("y[%d] = ",i); scanf("%f",&y[i]); } if (toupper(ok)!='C') t=0; } printf("CAC GIA TRI DA CHO"); printf("\n"); printf("X = "); for (i=1;i<=n;i++) printf("%c%8.3f",' ',x[i]); printf("\n"); printf("Y = "); for (i=1;i<=n;i++) printf("%c%8.3f",' ',y[i]); printf("\n"); a=0.0; for (i=1;i<=n;i++) a+=x[i]; b=n; c=0.0; for (i=1;i<=n;i++) c+=log(y[i]); d=0.0; for (i=1;i<=n;i++) d+=x[i]*x[i]; e=0.0; for (i=1;i<=n;i++) e+=x[i]*log(y[i]); d1=a*a-d*b; d2=c*a-e*b; d3=a*e-c*d; c=d2/d1; a=d3/d1; printf("\n"); printf("He so A = %8.4f",exp(a)); printf(" va so mu c = %8.4",c); printf("\n"); printf("\nBANG CAC GIA TRI TINH TOAN"); printf("\n"); printf("%5cx%28cy\n",' ',' '); for (i=1;i<=n;i++) { printf("%8.4f%21c%8.4f\n",x[i],' ',exp(a)*exp(c*x[i])); } 196 getch(); } Với các giá trị x,y đo đ−ợc theo bảng x 0 2 4 6 8 10 12 y 128 0 635 324 162 76 43 19 ta có n = 7 và tính đ−ợc theo ch−ơng trình các hệ số : A = 1285.44 va c = -0.3476 và hàm xấp xỉ sẽ là : f(x) = 1285.44 3.Hàm dạng Axq : Khi các số liệu thể hiện một sự biến đổi đơn điệu ta cũng có thể dùng hàm xấp xỉ là y = Axq.Lấy logarit hai vế ta có : lny = lnA + qlnx Theo điều kiện đạo hàm triệt tiêu ta có hệ ph−ơng trình : ⎪⎪⎩ ⎪⎪⎨ ⎧ =+ =+ ∑ ∑∑ ∑ ∑ = == = = n 1i n 1i ii n 1i ii 2 n 1i n 1i ii ylnxlnxlnAlnxlnq ylnAlnnxlnq Giải hệ ph−ơng trình này ta có các hệ số A và q : Ch−ơng trình 11-6 //xap_xi_x_mu; #include #include #include #include #define max 11 void main() { int i,n,t; float x[max],y[max]; char ok; float a,b,c,d,e,f,d1,d2,d3; clrscr(); printf("PHUONG PHAP BINH PHUONG TOI THIEU"); printf("\n"); printf("So diem da cho n = "); scanf("%d",&n); for (i=1;i<=n;i++) { printf("x[%d] = ",i); scanf("%f",&x[i]); printf("y[%d] = ",i); scanf("%f",&y[i]); 197 } x[0]=1.0; printf("%4cBANG SO LIEU\n",' '); printf("%8cx%30cy\n",' ',' '); for (i=1;i<=n;i++) printf("%4c%8.4f%23c%8.4f\n",' ',x[i],' ',y[i]); ok=' '; flushall(); t=1; while (t) { printf("Co sua so lieu khong(c/k): "); scanf("%c",&ok); if (toupper(ok)=='C') { printf("Chi so cua phan tu can sua i = "); scanf("%d",&i); printf("Gia tri moi : "); printf("x[",i,"] = "); scanf("%f",&x[i]); printf("y[%d] = ",i); scanf("%f",&y[i]); } if (toupper(ok)!='C') t=0; } printf("\n"); printf("\nCAC GIA TRI DA CHO"); printf("\n"); printf("X = "); for (i=1;i<=n;i++) printf("%c%8.3f",' ',x[i]); printf("\n"); printf("Y = "); for (i=1;i<=n;i++) printf("%c%8.3f",' ',y[i]); printf("\n"); a=0.0; for (i=1;i<=n;i++) a+=log(x[i]); b=n; c=0.0; for (i=1;i<=n;i++) c+=log(y[i]); d=0.0; for (i=1;i<=n;i++) d+=log(x[i])*log(x[i]); e=0.; for (i=1;i<=n;i++) e+=log(x[i])*log(y[i]); 198 d1=a*a-d*b; d2=c*a-e*b; d3=a*e-c*d; c=d2/d1; a=d3/d1; printf("\n"); printf("He so A = %8.4f",exp(a)); printf(" va so mu q = %8.4f\n",c); printf("\n"); printf("\nBANG CAC GIA TRI TINH TOAN\n"); printf("%5cx%27cy\n",' ',' '); for (i=1;i<=n;i++) { printf("%8.4f%20c%8.4f\n",x[i],' ',exp(a)*exp(c*log(x[i]))); } getch(); } Với các giá trị x,y đo đ−ợc theo bảng x 1 2 4 5 6 y 7.1 27.8 62.1 110 161 ta có n = 5 và tính đ−ợc theo ch−ơng trình các hệ số : A = 7.1641 và q = 1.9531 và hàm xấp xỉ sẽ là : f(x) = 1285.44x1.9531 4.Hàm l−ợng giác : Khi quan hệ y=f(x) có dạng tuần hoàn ta dùng hàm xấp xỉ là tổ hợp tuyến tính của các hàm sin và cosin dạng : ∑ ∑ = = ω+ω+= n 1i n 1i ii0 )xisin(b)xicos(aa)x(f Để đơn giản tr−ớc hết ta xét hàm chỉ có một số hạng sin-cos,nghĩa là : xsinbxcosaa)x(f 110 ω+ω+= Hàm S sẽ có dạng : [ ]∑ = ω+ω+−= n 1i 2 110i )xsinbxcosaa(yS Theo điều kiện đạo hàm triệt tiêu ta có hệ ph−ơng trình đối với các hệ số dạng : ⎥⎥ ⎥ ⎦ ⎤ ⎢⎢ ⎢ ⎣ ⎡ ω ω=⎥⎥⎦ ⎤ ⎢⎢⎣ ⎡ ⎥⎥ ⎥ ⎦ ⎤ ⎢⎢ ⎢ ⎣ ⎡ ωωωω ωωωω ωω ∑∑ ∑ ∑∑∑ ∑∑∑ ∑∑ xsiny xcosy y b a a xsinxsinxcosxsin xsinxcosxcosxcos xsinxcosn 1 1 0 2 2 Do : 0 n xsinxcos 2 1 n xcos 2 1 n xsin 0 n xcos 0 n xsin 22 =ωω =ω=ω =ω=ω ∑ ∑∑ ∑∑ nên hệ ph−ơng trình có dạng đơn giản : 199 ⎥⎥ ⎥ ⎦ ⎤ ⎢⎢ ⎢ ⎣ ⎡ ω ω=⎥⎥⎦ ⎤ ⎢⎢⎣ ⎡ ⎥⎥⎦ ⎤ ⎢⎢⎣ ⎡ ∑∑ ∑ xsiny xcosy y b a a 2n00 02n0 00n 1 1 0 Giải hệ ta có : ∑∑∑ ω=ω== xsinyn2bxcosyn2an y a 110 Trong tr−ờng hợp tổng quát,một cách t−ơng tự ta có : ∑∑∑ ω=ω== xisinyn2bxicosyn2an y a ii0 Ch−ơng trình tìm các hệ số ai và bi đ−ợc thể hiện nh− sau : Ch−ơng trình 11-7 //xap_xi_sin_cos; #include #include #include #include #define max 11 #define pi 3.15159 void main() { int i,j,m,n,t; float x[max],y[max],a[max],b[max]; char ok; float omg,t1; clrscr(); printf("PHUONG PHAP BINH PHUONG TOI THIEU"); printf("\n"); printf("Cho so so hang sin-cos m = "); scanf("%d",&m); printf("Cho chu ki T = "); scanf("%f",&t1); printf("So diem da cho n = "); scanf("%d",&n); for (i=1;i<=n;i++) { printf("x[%d] = ",i); scanf("%f",&x[i]); printf("y[%d] = ",i); scanf("%f",&y[i]); } x[0]=1.0; printf("%4cBANG SO LIEU\n",' '); printf("%8cx%30cy\n",' ',' '); for (i=1;i<=n;i++) 200 printf("%4c%8.4f%23c%8.4f\n",' ',x[i],' ',y[i]); ok=' '; t=1; flushall(); while (t) { printf("Co sua so lieu khong(c/k): "); scanf("%c",&ok); if (toupper(ok)=='C') { printf("Chi so cua phan tu can sua i = "); scanf("%d",&i); printf("Gia tri moi : "); printf("x[%d] = ",i); scanf("%f",&x[i]); printf("y[%d] = ",i); scanf("%f",&y[i]); flushall(); } if (toupper(ok)!='C') t=0; } printf("\nCAC GIA TRI DA CHO\n"); printf("\n"); printf(" X Y\n"); for (i=1;i<=n;i++) printf("%c%8.3f%c%8.3f\n",' ',x[i],' ',y[i]); printf("\n"); a[0]=0.0; omg=2*pi/t1; for (i=1;i<=n;i++) a[0]+=y[i]; a[0]/=n; for (j=1;j<=m;j++) { a[j]=0.0; for (i=1;i<=n;i++) a[j]+=y[i]*cos(j*omg*x[i]); a[j]=2*a[j]/n; } for (j=1;j<=m;j++) { b[j]=0.0; for (i=1;i<=n;i++) b[j]+=y[i]*sin(j*omg*x[i]); b[j]=2*b[j]/n; } printf("\n"); printf("TAN SO GOC OMEGA = %10.5f\n",omg); 201 printf("HE SO HANG\n"); printf("a[0] = %8.4f\n",a[0]); printf("CAC HE SO BAC CAO\n"); printf("%5ccos%25csin\n",' ',' '); for (i=1;i<=m;i++) printf("%8.4f%21c%6.4f\n",a[i],' ',b[i]); getch(); } Với hàm cho bằng bảng số : x 0 0.15 0.3 0.45 0.6 0.75 0.9 1.05 1.2 1.3 y 2.200 1.595 1.03 1 0.72 2 0.78 6 1.20 0 1.80 5 2.36 9 2.67 8 2.614 Chọn số hệ số sin-cos m = 1,số điểm cho tr−ớc n = 10,chu kì T = 15 ta nhận đ−ợc kết quả tính a0 = 1.7 ; a1 = 0.5 ; b1 = -0.8661 và ω = 4.18879.Nh− vậy hàm xấp xỉ có dạng : f(x) = 1.7 + 0.5cos(4.18879x) - 0.8661sin(4.18879x) 5.Hàm hữu tỉ : Khi quan hệ y = f(x) có dạng đ−ờng cong bão hoà hay dạng arctan,tan v.v ta dùng hàm xấp xỉ là hàm hữu tỉ dạng đơn giản : xb ax y += Lấy nghịch đảo của nó ta có : a 1 x 1 a b y 1 += Đặt 1/y = Y,1/x = X,b/a = B và 1/a = A ph−ơng trình trên sẽ có dạng : Y = A + BX và là một đa thức bậc một.Do vậy ta có hệ ph−ơng trình đối với các hệ số A và B là : ⎪⎪⎩ ⎪⎪⎨ ⎧ =+ =+ ∑ ∑∑ ∑ ∑ = == = = n 1i n 1i ii 2 i n 1i i n 1i n 1i ii yx 1 x 1 B x 1 A y 1 x 1 BnA và từ đó tính đ−ợc a và b.Ch−ơng trình sau mô tả thuật toán trên Ch−ơng trình 11-.8 //xap xi huu_ty; #include #include #include #include #define k 11 void main() { float x[k],y[k]; float a,b,a1,b1,c,d,e; int i,n,t; 202 char ok; clrscr(); printf("PHUONG PHAP BINH PHUONG TOI THIEU"); printf("\n"); printf("So diem da cho n = "); scanf("%d",&n); for (i=1;i<=n;i++) { printf("x[%d] = ",i); scanf("%f",&x[i]); printf("y[%d] = ",i); scanf("%f",&y[i]); } printf("%4cBANG SO LIEU\n",' '); printf("%8cx%30cy\n",' ',' '); for (i=1;i<=n;i++) printf("%4c%8.4f%23c%8.4f\n",' ',x[i],' ',y[i]); ok=' '; t=1; flushall(); while (t) { printf("Co sua so lieu khong(c/k): "); scanf("%c",&ok); if (toupper(ok)=='C') { printf("Chi so cua phan tu can sua i = "); scanf("%d",&i); printf("Gia tri moi : "); printf("x[%d] = ",i); scanf("%f",&x[i]); printf("y[%d] = ",i); scanf("%f",&y[i]); flushall(); } if (toupper(ok)!='C') t=0; } printf("CAC GIA TRI DA CHO\n"); printf("\n"); printf("X = "); for (i=1;i<=n;i++) printf("%c%8.3f",' ',x[i]); printf("\n"); printf("Y = "); for (i=1;i<=n;i++) printf("%c%8.3f",' ' ,y[i]); printf("\n"); a=n; 203 b=0.0; c=0.0; d=0.0; e=0.0; for (i=1;i<=n;i++) { b+=1/x[i]; c+=1/y[i]; d+=1/(x[i]*x[i]); e+=1/(x[i]*y[i]); } a1=(c*d-b*e)/(a*d-b*b); b1=(a*e-b*c)/(a*d-b*b); a=1/a1; b=b1*a; printf("\n"); printf("Cac he so cua ham huu ty\n"); printf("a = %10.5f b = %10.5f",a,b); getch(); } Với dãy số liệu đã cho : x 1 2 3 4 5 y 0.333333 3 0.5 0.6 0.66666 0.7142857 ta nhận đ−ợc từ ch−ơng trình trị số a = 1 và b = 2

Các file đính kèm theo tài liệu này:

  • pdfgiao_trinh_turbo_c_nang_cao_va_c_chuong_11_noi_suy_va_xap_xi.pdf
Tài liệu liên quan