1、2019/6/29,1,第七章 MATLAB解方程与 函数极值,2019/6/29,2,线性方程组求解非线性方程数值求解 常微分方程初值问题的数值解法 函数极值,2019/6/29,3,7.1 线性方程组求解 7.1.1 直接解法1. 利用左除运算符的直接解法对于线性方程组Ax=b，可以利用左除运算符“”求解：x=Ab,例7-1 用直接解法求解下列线性方程组。,2019/6/29,4,2. 利用矩阵的分解求解线性方程组矩阵分解是指根据一定的原理用某种算法将一个矩阵分解成若干个矩阵的乘积。常见的矩阵分解有LU分解、QR分解、Cholesky分解，以及Schur分解、Hessenberg分解、奇异
2、分解等。,2019/6/29,5,(1) LU分解矩阵的LU分解就是将一个矩阵表示为一个交换下三角矩阵和一个上三角矩阵的乘积形式。线性代数中已经证明，只要方阵A是非奇异的，LU分解总是可以进行的。MATLAB提供的lu函数用于对矩阵进行LU分解，其调用格式为：L,U=lu(X)：产生一个上三角阵U和一个变换形式的下三角阵L(行交换)，使之满足X=LU。注意，这里的矩阵X必须是方阵。L,U,P=lu(X)：产生一个上三角阵U和一个下三角阵L以及一个置换矩阵P，使之满足PX=LU。当然矩阵X同样必须是方阵。实现LU分解后，线性方程组Ax=b的解x=U(Lb)或x=U(LPb)，这样可以大大提高运算
3、速度。,例7-2 用LU分解求解例7-1中的线性方程组。,2019/6/29,6,(2) QR分解对矩阵X进行QR分解，就是把X分解为一个正交矩阵Q和一个上三角矩阵R的乘积形式。QR分解只能对方阵进行。MATLAB的函数qr可用于对矩阵进行QR分解，其调用格式为：Q,R=qr(X)：产生一个一个正交矩阵Q和一个上三角矩阵R，使之满足X=QR。Q,R,E=qr(X)：产生一个一个正交矩阵Q、一个上三角矩阵R以及一个置换矩阵E，使之满足XE=QR。实现QR分解后，线性方程组Ax=b的解x=R(Qb)或x=E(R(Qb)。,例7-3 用QR分解求解例7-1中的线性方程组。,2019/6/29,7,(
4、3) Cholesky分解如果矩阵X是对称正定的，则Cholesky分解将矩阵X分解成一个下三角矩阵和上三角矩阵的乘积。设上三角矩阵为R，则下三角矩阵为其转置，即X=RR。MATLAB函数chol(X)用于对矩阵X进行Cholesky分解，其调用格式为：R=chol(X)：产生一个上三角阵R，使RR=X。若X为非对称正定，则输出一个出错信息。R,p=chol(X)：这个命令格式将不输出出错信息。当X为对称正定的，则p=0，R与上述格式得到的结果相同；否则p为一个正整数。如果X为满秩矩阵，则R为一个阶数为q=p-1的上三角阵，且满足RR=X(1:q,1:q)。实现Cholesky分解后，线性方程
5、组Ax=b变成RRx=b，所以x=R(Rb)。,2019/6/29,8,例7-4 用Cholesky分解求解例7-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 = cholMatrix must be positive definite命令执行时，出现错误信息，说明A为非正定矩阵。,2019/6/29,9,7.1.2 迭代解法迭代解法非常适合求解大型系数矩阵的方程组。在数值分析中，迭代解法主要包括 Jacobi迭代法、Gauss-Serdel迭代法、超松弛迭代法和两
6、步迭代法。1. Jacobi迭代法对于线性方程组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-1b与之对应的迭代公式为：x(k+1)=D-1(L+U)x(k)+D-1b这就是Jacobi迭代公式。如果序列x(k+1)收敛于x，则x必是方程Ax=b的解。,2019/6/29,10,例7-5 用Jacobi迭代法求解下列线性方程组。 设迭代初值为0，迭代精度为10-6。,Jacobi迭代法的MATLAB函数文件Jacobi.m,2019/6
7、/29,11,2. Gauss-Serdel迭代法,在Jacobi迭代过程中，计算时，已经得到，不必再用，即原来的迭代公式Dx(k+1)=(L+U)x(k)+b可以改进为Dx(k+1)=Lx(k+1)+Ux(k)+b，于是得到： x(k+1)=(D-L)-1Ux(k)+(D-L)-1b 该式即为Gauss-Serdel迭代公式。和Jacobi迭代相比，Gauss-Serdel迭代用新分量代替旧分量，精度会高些。,2019/6/29,12,Gauss-Serdel迭代法的MATLAB函数文件gauseidel.m,例7-6 用Gauss-Serdel迭代法求解下列线性方程组。设迭代初值为0，迭代
8、精度为10-6。,例7-7 分别用Jacobi迭代和Gauss-Serdel迭代法求解下列线性方程组，看是否收敛。,2019/6/29,13,7.2 非线性方程数值求解 7.2.1 单变量非线性方程求解在MATLAB中提供了一个fzero函数，可 以用来求单变量非线性方程的根。该函数的调用格式为：z=fzero(fname,x0,tol,trace)其中fname是待求根的函数文件名，x0为搜索的起点。一个函数可能有多个根，但fzero函数只给出离x0最近的那个根。tol控制结果的相对精度，缺省时取tol=eps，trace指定迭代信息是否在运算中显示，为1时显示，为0时不显示，缺省时取tra
9、ce=0。,2019/6/29,14,例7-8 求f(x)=x-10x+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,2019/6/29,15,7.2.2 非线性方程组的求解对于非线性方程组F(X)=0，用fsolve函数求其数值解。fsolve函数的调用格式为：X=fsolve(fun,X0,option)其中X为返回的解，fun是用于定义需求解的非线性方程组的函数文件名，X0是求根过程的初值，option为最优化工具
10、箱的选项设定。最优化工具箱提供了20多个选项，用户可以使用optimset命令将它们显示出来。如果想改变其中某个选项，则可以调用optimset()函数来完成。例如，Display选项决定函数调用时中间结果的显示方式，其中off为不显示，iter表示每步都显示，final只显示最终结果。optimset(Display,off)将设定Display选项为off。,2019/6/29,16,例7-9 求下列非线性方程组在(0.5,0.5) 附近的数值解。(1) 建立函数文件myfun.m。function q=myfun(p)x=p(1);y=p(2);q(1)=x-0.6*sin(x)-0.3
11、*cos(y);q(2)=y-0.6*cos(x)+0.3*sin(y);(2) 在给定的初值x0=0.5,y0=0.5下，调用fsolve函 数求方程的根。x=fsolve(myfun,0.5,0.5,optimset(Display,off)x =0.63540.3734,2019/6/29,17,7.3 常微分方程初值问题的数值解法 7.3.1 龙格库塔法基于龙格库塔法，MATLAB提供了求常微 分方程数值解的函数，一般调用格式为：t,y=ode23(fname,tspan,y0)t,y=ode45(fname,tspan,y0)其中fname是定义f(t,y)的函数文件名，该函数 文件
12、必须返回一个列向量。tspan形式为t0,tf, 表示求解区间。y0是初始状态列向量。t和y分别给出时间向量和相应的状态向量。,2019/6/29,18,(1) 建立函数文件funt.m。 function yp=funt(t,y) yp=(y2-t-2)/4/(t+1); (2) 求解微分方程。 t0=0;tf=10; y0=2; t,y=ode23(funt,t0,tf,y0); %求数值解 y1=sqrt(t+1)+1; %求精确解 t y y1 y为数值解，y1为精确值，显然两者近似。,例7-10 设有初值问题，试求其数值解，并与精确解相比较(精确解为y1=sqrt(t+1)+1 。)
13、,2019/6/29,19,7.4 函数极值MATLAB提供了基于单纯形算法求解函数极值的函数fminbnd和fminsearch，它们分别用于单变量函数和多变量函数的最小值，其调用格式为：x=fminbnd(fname,x1,x2)x=fminsearch(fname,x0) 这两个函数的调用格式相似。其中fminbnd函数用于求单变量函数的最小值点。fname是被最小化的目标函数名，x1和x2限定自变量的取值范围。fminsearch函数用于求多变量函数的最小值点，x0是求解的初始值向量。,2019/6/29,20,MATLAB没有专门提供求函数最大值的函数，但只要注意到-f(x)在区间(a,b)上的最小值就是f(x)在(a,b)的最大值，所以fminbnd(f,x1,x2)返回函数f(x)在区间(x1,x2)上的最大值。,2019/6/29,21,例7-11 求f(x)=x3-2x-5在0,5内的最小值点。,例7-12 多变量函数极值事例,(1)创造一个函数文件three_var.m function b=three_var(v) x=v(1); y=v(2); z=v(3); b=x.2+2.5*sin(y)-z2*x2*y2; (2)找出函数极值 v=-0.6 -1.2 0.135; a=fminsearch(three_var,v),
