单击此处编辑母版标题样式,单击此处编辑母版文本样式,第二级,第三级,第四级,第五级,*,*,*,第4章 MATLAB解方程与函数极值,4.1 线性方程组求解,4.2 非线性方程数值求解,4.3 常微分方程初值问题的数值解法,4.4 无约束优化问题,4.5 约束优化问题,11/15/2024,1,第4章 MATLAB解方程与函数极值10/8/20231,4.1 线性方程组求解,4.1.1 直接解法,1利用左除运算符的直接解法,对于线性方程组,Ax,=,b,，可以利用左除运算符“,”求解：,x=A,b,对于线性方程组,xA,=,b,，可以利用右除运算符“,/,”求解：,x=A,/,b,11/15/2024,2,4.1 线性方程组求解10/8/20232,例4-1：用直接解法求解下列线性方程组。,命令如下：,A=2,1,-5,1;1,-5,0,7;0,2,1,-1;1,6,-1,-4;,b=13,-9,6,0;,x=Ab,结果：,x=,-66.5556,25.6667,-18.7778,26.5556,11/15/2024,3,例4-1：用直接解法求解下列线性方程组。10/8/20233,2利用矩阵的分解求解线性方程组,矩阵分解是指根据一定的原理用某种算法将一个矩阵分解成若干个矩阵的乘积。常见的矩阵分解有LU分解、QR分解、Cholesky分解，以及Schur分解、Hessenberg分解、奇异分解等。,11/15/2024,4,2利用矩阵的分解求解线性方程组10/8/20234,(1)LU分解,矩阵的LU分解就是将一个矩阵表示为一个交换下三角矩阵和一个上三角矩阵的乘积形式。线性代数中已经证明，,只要方阵A是非奇异的,，LU分解总是可以进行的。,MATLAB提供的lu函数用于对矩阵进行LU分解，其调用格式为：,L,U=lu(A)：产生一个上三角阵U和一个变换形式的下三角阵L(行交换)，使之满足A=LU。注意，这里的矩阵A必须是方阵。,L,U,P=lu(A)：产生一个上三角阵U和一个下三角阵L以及一个置换矩阵P，使之满足PA=LU。当然矩阵A同样必须是方阵。,实现LU分解后，线性方程组Ax=b的解x=U(Lb)或x=U(LP*b)，这样可以大大提高运算速度。,11/15/2024,5,(1)LU分解10/8/20235,例：用LU分解求解例4-1中的线性方程组。,命令如下：,A=2,1,-5,1;1,-5,0,7;0,2,1,-1;1,6,-1,-4;,b=13,-9,6,0;,L,U=lu(A);,x=U(Lb),或采用LU分解的第2种格式，命令如下：,L,U,P=lu(A);,x=U(LP*b),11/15/2024,6,例：用LU分解求解例4-1中的线性方程组。10/8/2023,(2)QR分解,对矩阵A进行QR分解，就是把A分解为一个正交矩阵Q和一个上三角矩阵R的乘积形式。QR分解只能对,方阵,进行。MATLAB的函数qr可用于对矩阵进行QR分解，其调用格式为：,Q,R=qr(A)：产生一个一个正交矩阵Q和一个上三角矩阵R，使之满足X=QR。,Q,R,E=qr(A)：产生一个一个正交矩阵Q、一个上三角矩阵R以及一个置换矩阵E，使之满足AE=QR。,实现QR分解后，线性方程组Ax=b的解x=R(Qb)或x=E(R(Qb)。,11/15/2024,7,(2)QR分解10/8/20237,例：用QR分解求解例4-1中的线性方程组。,命令如下：,A=2,1,-5,1;1,-5,0,7;0,2,1,-1;1,6,-1,-4;,b=13,-9,6,0;,Q,R=qr(A);,x=R(Qb),或采用QR分解的第2种格式，命令如下：,Q,R,E=qr(A);,x=E*(R(Qb),11/15/2024,8,例：用QR分解求解例4-1中的线性方程组。10/8/202,(3)Cholesky分解,如果矩阵A是对称正定的,，则Cholesky分解将矩阵A分解成一个下三角矩阵和上三角矩阵的乘积。设上三角矩阵为R，则下三角矩阵为其转置，即,A=RR,。MATLAB函数chol(A)用于对矩阵A进行Cholesky分解，其调用格式为：,R=chol(A)：产生一个上三角阵R，使,R,R,=,A,。若A为非对称正定，则输出一个出错信息。,实现Cholesky分解后，线性方程组Ax=b变成RRx=b，所以x=R(Rb)。,11/15/2024,9,(3)Cholesky分解10/8/20239,例：用Cholesky分解求解例4-1中的线性方程组。,命令如下：,A=2,1,-5,1;1,-5,0,7;0,2,1,-1;1,6,-1,-4;,b=13,-9,6,0;,R=chol(A),?Error using=chol,Matrix must be positive definite,命令执行时，出现错误信息，说明A为非正定矩阵。,11/15/2024,10,例：用Cholesky分解求解例4-1中的线性方程组。10,4.1.2 迭代解法,迭代解法非常适合求解大型系数矩阵的方程组。在数值分析中，迭代解法主要包括 Jacobi迭代法、Gauss-Serdel迭代法、超松弛迭代法和两步迭代法。,1Jacobi迭代法,对于线性方程组Ax=b，如果A中aii0(i=1,2,n)，则可将A分解为A=D-L-U，其中D为对角阵，其元素为A的对角元素，L与U为A的下三角阵和上三角阵，于是Ax=b化为：,x=D,-1,(L+U)x+D,-1,b,与之对应的迭代公式为：,x(k+1)=D,-1,(L+U)x(k)+D,-1,b,这就是Jacobi迭代公式。如果序列x(k+1)收敛于x，则x必是方程Ax=b的解。,Jacobi迭代,法收敛的充分必要条件是,D,-1,(L+U)最大特征值的绝对值小于1。,11/15/2024,11,4.1.2 迭代解法10/8/202311,Jacobi迭代法的,MATLAB函数原文件,Jacobi.m如下：,function y,n=jacobi(A,b,x0,eps),if nargin=3,eps=1.0e-6;,elseif nargin=eps,x0=y;,y=B*x0+f;,n=n+1;,end,11/15/2024,12,Jacobi迭代法的MATLAB函数原文件Jacobi.m如,例：用Jacobi迭代法求解下列线性方程组。设迭代初值为0，迭代精度为10,-6,。,在命令中调用函数文件Jacobi.m，命令如下：,A=10,-1,0;-1,10,-2;0,-2,10;,b=9,7,6;,x,n=jacobi(A,b,0,0,0,1.0e-6),结果：,x=,0.9958,0.9579,0.7916,n=,11,11/15/2024,13,例：用Jacobi迭代法求解下列线性方程组。设迭代初值为0，,2Gauss-Serdel迭代法,在Jacobi迭代过程中，计算时，已经得到，不必再用，即原来的迭代公式Dx,(k+1),=(L+U)x,(k),+b可以改进为Dx,(k+1),=Lx,(k+1),+Ux,(k),+b，于是得到：,x,(k+1),=(D-L),-1,Ux,(k),+(D-L),-1,b,该式即为Gauss-Serdel迭代公式。和Jacobi迭代相比，Gauss-Serdel迭代用新分量代替旧分量，精度会高些。,Gauss-Serdel迭代,法收敛的充分必要条件是,(D-L),-1,U最大特征值的绝对值小于1。,11/15/2024,14,2Gauss-Serdel迭代法10/8/202314,Gauss-Serdel迭代法的,MATLAB函数原文件,gauseidel.m如下：,function y,n=gauseidel(A,b,x0,eps),if nargin=3,eps=1.0e-6;,elseif nargin=eps,x0=y;,y=G*x0+f;,n=n+1;,end,11/15/2024,15,Gauss-Serdel迭代法的MATLAB函数原文件gau,例：用Gauss-Serdel迭代法求解下列线性方程组。设迭代初值为0，迭代精度为10,-6,。,在命令中调用函数文件gauseidel.m，命令如下：,A=10,-1,0;-1,10,-2;0,-2,10;,b=9,7,6;,x,n=gauseidel(A,b,0,0,0,1.0e-6),结果：,x=,0.9958,0.9579,0.7916,n=,7,11/15/2024,16,例：用Gauss-Serdel迭代法求解下列线性方程组。设迭,若J法与GS法均收敛，则GS法比J法约快一倍，但也可能J法收敛而GS法不收敛或相反。,11/15/2024,17,若J法与GS法均收敛，则GS法比J法约快一,例:分别用Jacobi迭代和Gauss-Serdel迭代法求解下列线性方程组，看是否收敛。,命令如下：,a=1,2,-2;1,1,1;2,2,1;,b=9;7;6;,x,n=jacobi(a,b,0;0;0),x,n=gauseidel(a,b,0;0;0),x=,-27,26,8,n=,4,x=,NaN,NaN,NaN,n=,1012,11/15/2024,18,例:分别用Jacobi迭代和Gauss-Serdel迭代法,4.2 非线性方程数值求解,4.2.1 单变量非线性方程求解,在MATLAB中提供了一个fzero函数，可以用来求单变量非线性方程的根。该函数的调用格式为：,z=fzero(fname,x0,tol,trace),其中fname是待求根的函数文件名，x0为搜索的起点。一个函数可能有多个根，但fzero函数只给出离x0最近的那个根。tol控制结果的相对精度，缺省时取tol=eps，trace指定迭代信息是否在运算中显示，为1时显示，为0时不显示，缺省时取trace=0。,11/15/2024,19,4.2 非线性方程数值求解10/8/202319,例：求f(x)=x-10,x,+2=0在x0=0.5附近的根。,步骤如下：,(1)建立函数文件funx.m。,function fx=funx(x),fx=x-10.x+2;,(2)调用fzero函数求根。,z=fzero(funx,0.5),z=,0.3758,11/15/2024,20,例：求f(x)=x-10 x+2=0在x0=0.5附近,4.2.2 非线性方程组的求解,对于非线性方程组F(X)=0，用fsolve函数求其数值解。fsolve函数的调用格式为：,X=fsolve(fun,X0,option),其中X为返回的解，fun是用于定义需求解的非线性方程组的函数文件名，X0是求根过程的初值，option为最优化工具箱的选项设定。最优化工具箱提供了20多个选项，用户可以使用optimset命令将它们显示出来。如果想改变其中某个选项，则可以调用optimset()函数来完成。例如，Display选项决定函数调用时中间结果的显示方式，其中off为不显示，iter表示每步都显示，final只显示最终结果。optimset(Display,off)将设定Display选项为off。,11/15/2024,21,4.2.2 非线性方程组的求解10/8/202321,例：求下列非线性方程组在(0.5,0.5)附近的数值解。,x-0.6*sin(x)-0.3*cos(y)=0;,y-0.6*cos(x)+0.3*sin(y)=0;,(1)建立函数文件myfun.m。,function q=myfun(x),q(1)=x(1)-0.6*sin(x(1)-0.3*cos(x(2);,q(2)=x(2)-0.6*cos(x(1)+0.3*sin(x(2);,(2)在给定的初值x0=0.5,y0=0.5下，调用fsolve函数求方程的根。,x=fsolve(myfun,0.5,0.5,optimset(Display,off),x=,0.6354,0.3734,11/15/2024,22,