计算方法作业_第1页
计算方法作业_第2页
计算方法作业_第3页
计算方法作业_第4页
计算方法作业_第5页
已阅读5页,还剩25页未读 继续免费阅读

下载本文档

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

文档简介

n=1ysinxcosx);1sx231.研究人口数据的插值与预测年年194019501960197019801990人口(千人)132,165151,326179,323203,302226,542249,633xx123456789yxy(1)用最小二乘法确定模型y=aebx中的参数a和b。(2)利用MATLAB画出离散数据及拟合函数y=aebx图形。实验内容:对于定积分I=j1xdx。x20 (1 (1AA(1-1-111-1-11-11-112w2定性 92351 L0-7-11]分别对以上两个方程组(1)计算矩阵的条件数,判断系数矩阵是良态的还是病态的?(2)用列主元消去法求得L和U及解向量x,x=R4;LU=R4;(4)观察小主元并分析对计算结果的影响。3.求解非线性方程,比较不同方法的计算量(1)在区间[0,1]内用二分法;(3)用牛顿迭代法,取初值x=0。0 (1 (1《计算方法》上机实验报告AA(1-1-111-1-11-11-112w2定性 92351 L0-7-11]分别对以上两个方程组(1)计算矩阵的条件数,判断系数矩阵是良态的还是病态的?(2)用列主元消去法求得L和U及解向量x,x=R4;LU=R4;(4)观察小主元并分析对计算结果的影响。3.求解非线性方程,比较不同方法的计算量(1)在区间[0,1]内用二分法;(3)用牛顿迭代法,取初值x=0。A=[1111;-11-11;-1-111;1-1-11];a1=norm(A,1);a2=norm(A);a3=norm(A,inf);B=inv(A);a4=norm(B);a5=a2*a4;fprintf('||A||1is%d\n',a1);fprintf('||A||2is%f\n',a2);fprintf('||A||is%d\n',a3);fprintf('cond2(A)is%f\n',a5);2.(1)A=[3e-1659.4131;5.291-6.130-12;11.2952;1211];aA=cond(A,2)B=[10-701;-32.09999999999999962;5-15-1;0102];aB=cond(B,2)(2)%构造函数functionx=gauss1(A,b)A=[A';b]',n=length(b);fork=1:n-1s=A(k,k);p=k;fori=k+1:nifabs(s)<abs(A(i,k))s=A(i,k);p=i;endendpsifp~=kforj=k:n+1t=A(k,j);A(k,j)=A(p,j);A(p,j)=t;endendAfori=k+1:nm=A(i,k)/A(k,k);fprintf('m%d%d=%f\n',i,k,m);forj=k:n+1A(i,j)=A(i,j)-m*A(i,j);endendfprintf('A%d=\n',k+1);AendA(n,n+1)=A(n,n+1)/A(n,n);fori=n-1:-1:1s=0;forj=j+1:ns=s+A(i,j)*A(j,n+1);endA(i,n+1)=(A(i,n+1)-s)/A(i,i);endA(:,n+1)A=[3e-1659.4131;5.291-6.130-12;11.2952;1211];B=[10-701;-32.09999999999999962;5-15-1;0102];b1=[59.1746.7812];b2=[85.9000000000000151];x1=gauss1(A,b1)x2=gauss1(B,b2)(1)%构造二分法函数function[xstar,k]=fen(fun,a,b,ep)ifnargin<4,ep=1e-5;endfa=feval(fun,a);fb=feval(fun,b);iffa*fb>0xstar=[fa,fb];k=0;return;endk=1;whileabs(b-a)/2>epx=(a+b)/2;fx=feval(fun,x);iffx*fa<0b=x;fb=fx;elsea=x;fa=fx;endk=k+1;endxstar=(a+b)/2;endfun=inline('exp(x)+10*x-2');[xstar,k]=fen(fun,0,1,0.001)(C)%构造迭代函数function[xstar,k]=diedai(fun,x0,ep,nmax)ifnargin<4nmax=500;endifnargin<3ep=1e-5;endx=x0;x0=x+2*ep;k=0;whileabs(x0-x)>ep&k<nmaxx0=x;x=feval(fun,x0)k=k+1;endxstar=x;ifk==nmaxwarning('get');endEndfun2=inline('0.1*(2-exp(x))');[xstar2,k2]=diedai(fun2,0)(3)%构造牛顿迭代函数function[xstar,k]=newtown(fname,dfname,x0,ep,nmax)ifnargin<5nmax=500;endifnargin<4ep=1e-5;endx=x0;x0=x+2*ep;k=0;whileabs(x0-x)>ep&&k<nmaxk=k+1;x0=x;x=x0-feval(fname,x0)/feval(dfname,x0);endxstar=x;ifk==nmaxwarning('enough');endEndfname=inline('exp(x)+10x-2');dfna

温馨提示

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

评论

0/150

提交评论