武汉理工大学数值分析(高秉建)的作业_第1页
武汉理工大学数值分析(高秉建)的作业_第2页
武汉理工大学数值分析(高秉建)的作业_第3页
武汉理工大学数值分析(高秉建)的作业_第4页
武汉理工大学数值分析(高秉建)的作业_第5页
已阅读5页,还剩1页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

数值分析实验一、95页第17题实验数据如下:用最小二乘法求一个形如的经验公式,使它拟合以下数据,并计算均方误差.解:此题给出拟合曲线,即,故法方程系数

法方程为

解得

最小二乘拟合曲线为

均方程为

二、238页第2题第二问求方程在=1.5附近的一个根解:设将方程改写为建立迭代公式,k=0,1,2,3…取,那么

原方程的根为=1.4665572三、书238页第7题第一问1.用牛顿法求在=2附近的根解:

Newton迭代法

取,那么,取2.用牛顿法求的实根解:令,那么,取四、49页第20题给定数据表如下:Xj0.250.300.390.450.53Yj0.50000.54770.62450.67080.7280试求三次样条插值,并满足条件:解:由此得矩阵形式的方程组为21M02M12M22M312M4求解此方程组得三次样条表达式为将代入得由此得矩阵开工的方程组为求解此方程组,得又三次样条表达式为将代入得五、50页计算实习题第一题①/*拉格朗日差值*/#include<stdio.h>#include<conio.h>#defineN4voidmain(){intcheckvalid(doublex[],intn);doubleLargrange(doublex[],doubley[],doublevarx,intn);doublex[N+1]={0.4,0.55,0.8,0.9,1};doubley[N+1]={0.41075,0.57815,0.88811,1.02652,1.17520};doublevarx=0.5;if(checkvalid(x,N)==1)printf("\n\n插值结果:P(%f)=%f\n",varx,Largrange(x,y,varx,N));elseprintf("输入的插值节点的x值必须互异!");getch();}intcheckvalid(doublex[],intn){inti,j;for(i=0;i<n+1;i++)for(j=i+1;j<n+1;j++)if(x[i]==x[j])return-1;elsereturn1;}doubleLargrange(doublex[],doubley[],doublevarx,intn){intk,j;doubleA,B,C=1,D=0;for(k=0;k<=n;k++){C=1;for(j=0;j<=n;j++){if(j!=k){A=(varx-x[j]);B=(x[k]-x[j]);C=C*A/B;}}D=D+C*y[k];}returnD;}②/*牛顿插值*/#include<stdio.h>#include<conio.h>#defineN4intcheckvalid(doublex[],intn){inti,j;for(i=0;i<N;i++)for(j=i+1;j<=N;j++){if(x[i]==x[j])return(-1);}return(1);}voidchashang(doublex[N],doubley[N],doublef[N][N]){inti,j,h;for(j=0;j<=N;j++){f[j][j]=y[j];}for(h=1;h<=N;h++){for(i=0;i<=N-h;i++){f[i][i+h]=(f[i+1][i+h]-f[i][i+h-1])/(x[i+h]-x[i]);}}}doublecompvalue(doublef[N][N],doublex[N],doubley[N],doublevarx){inti;doublet=1.000000,n=y[0];chashang(x,y,f);for(i=1;i<=N;i++){t=t*(varx-x[i-1]);n=n+f[0][i]*t;}returnn;printf("theresultis%f.",n);}voidmain(){inti,j;doublevarx,x[N],y[N],f[N][N];printf("inputthevalueofx:");for(i=0;i<N;i++)scanf("%f",&x[i]);if(checkvalid(x,N)==1){printf("inputthevalueofy:");for(j=0;j<N;j++)scanf("%f",&y[j]);printf("inputthevalueofvarx:");scanf("%f",&varx);compvalue(f,x,y,varx);}elseprintf("thevalueofxmustbedifferent!\n");}六、238页第8题用牛顿迭代法求的最小正根.解显然满足.另外当较小时,,故当时,,因此,方程的最小正根应在内.记,容易算得,因此[4,4.6]是的有限区间.对于二分法,计算结果见下表01234567894.04.34.454.454.48754.48754.48754.49218754.49218754.4933593754.64.64.64.5254.5254.506254.4968754.4968754.494531254.494531254.34.454.5254.48754.506254.4968754.49218754.494531254.4933593754.493445313++-+--+-+-此时.假

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论