坐標(biāo)輪換法c程序設(shè)計_第1頁
坐標(biāo)輪換法c程序設(shè)計_第2頁
坐標(biāo)輪換法c程序設(shè)計_第3頁
坐標(biāo)輪換法c程序設(shè)計_第4頁
免費預(yù)覽已結(jié)束,剩余1頁可下載查看

付費下載

下載本文檔

版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進(jìn)行舉報或認(rèn)領(lǐng)

文檔簡介

坐標(biāo)輪換法c程序設(shè)計坐標(biāo)輪換法c程序設(shè)計坐標(biāo)輪換法c程序設(shè)計xxx公司坐標(biāo)輪換法c程序設(shè)計文件編號:文件日期:修訂次數(shù):第1.0次更改批準(zhǔn)審核制定方案設(shè)計,管理制度////用坐標(biāo)輪換法求得函數(shù)的最優(yōu)解//#include""#include""#include""#include""#defineedoublefuntion(doublex[],inta){ doublef1; f1=pow(pow(x[0],2)+x[1]-11,2)+pow(x[0]+pow(x[1],2)-7,2); returnf1;}intmain(intargc,char*argv[]){ ints1[2],s2[2],i,j; doublex[100][2],xl[2],h1,t,m,f1,f2,fl,p,f3,f4; h1=,t=,p=2; s1[0]=1,s1[1]=0; s2[0]=0,s2[1]=1; x[0][0]=,x[0][1]=;f1=funtion(x[0],2); x[1][0]=x[0][0]+h1*s1[0]; x[1][1]=x[0][1]+h1*s1[1]; f2=funtion(x[1],2);for(j=1;;j++){if(f1>f2) { for(i=2;;i++) { h1=p*h1; f3=funtion(x[i-1],2); x[i][0]=x[i-1][0]+h1*s1[0]; x[i][1]=x[i-1][1]+h1*s1[1]; f4=funtion(x[i],2); if(f3<f4)break; } x[0][0]=x[i-2][0]; x[0][1]=x[i-2][1]; x[1][0]=x[i-3][0]; x[1][1]=x[i-3][1]; }else { h1=-h1; for(i=1;;i++) {f3=funtion(x[i-1],2);x[i][0]=x[i-1][0]+h1*s1[0]; x[i][1]=x[i-1][1]+h1*s1[1];f4=funtion(x[i],2); h1=p*h1; if(f3<f4)break; }x[0][0]=x[i-1][0]; x[0][1]=x[i-1][1];x[1][0]=x[i-2][0]; x[1][1]=x[i-2][1]; } t=-t; f1=funtion(x[0],2); x[1][0]=x[0][0]+t*s2[0]; x[1][1]=x[0][1]+t*s2[1]; f2=funtion(x[1],2);if(f1>f2) { for(i=2;;i++) { t=p*t; f3=funtion(x[i-1],2); x[i][0]=x[i-1][0]+t*s2[0]; x[i][1]=x[i-1][1]+t*s2[1]; f4=funtion(x[i+1],2); if(f3<f4)break; }x[0][0]=x[i-1][0]; x[0][1]=x[i-1][1];x[1][0]=x[i-2][0]; x[1][1]=x[i-2][1]; } else { t=-t; for(i=1;;i++) {f3=funtion(x[i-1],2);x[i][0]=x[i-1][0]+t*s2[0]; x[i][1]=x[i-1][1]+t*s2[1];f4=funtion(x[i],2); t=p*t; if(f3<f4)break; }x[0][0]=x[i-1][0]; x[0][1]=x[i-1][1];x[1][0]=x[i-2][0]; x[1][1]=x[i-2][1]; } m=pow(pow((x[0][0]-x[1][0]),2)+pow((x[0][1]-x[1][1]),2),; if(m<e) { xl[0]=x[0][0]; xl[1]=x[0][1]; fl=funtion(xl,2); printf("最優(yōu)解為:xl=(%f,%f)\n最優(yōu)解的函數(shù)值為:fl=%f\n",xl[0],xl[1],fl); exit(0); } else {h1=,t=,p=*p;x[0][0]=,x[0][1]=;f1=funtio

溫馨提示

  • 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負(fù)責(zé)。
  • 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請與我們聯(lián)系,我們立即糾正。
  • 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

評論

0/150

提交評論