例73用QR分解求解例7-1中的线性方程组。 命令如下: A=[2,1,5,1;1,5,0,7;0,2,1,-1;1,6,1,-4; b=[13,-9,6,0’; IQ,REgr(a); X=RYQIb 或采用QR分解的第2种格式,命令如下: IQ,r,Eqr(A); X=E*(RIQIb))例7-3 用QR分解求解例7-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\(Q\b) 或采用QR分解的第2种格式，命令如下： [Q,R,E]=qr(A); x=E*(R\(Q\b))