求解线性代数矩阵问题 请大家帮我看下第3题的第一列是怎么全部变成x的，求详细步骤，万分感谢_百度知道
求解线性代数矩阵问题 请大家帮我看下第3题的第一列是怎么全部变成x的，求详细步骤，万分感谢
//b.jpg" target="_blank" title="点击查看大图" class="ikqb_img_alink"><img class="ikqb_img" src="http.hiphotos://b.baidu.jpg" esrc="http&/zhidao/wh%3D600%2C800/sign=/zhidao/pic/item/f997feae2bb.hiphotos.<a href="/zhidao/wh%3D450%2C600/sign=c240c38a570fd9f9adf81c/f997feae2bb.baidu.baidu://b
提问者采纳
初等列变换，把后面三列都加到第一列
提问者评价
太给力了，你的回答完美地解决了我的问题，非常感谢！
其他类似问题
为您推荐：
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁利用伴随矩阵法求下列方阵的逆矩阵. A=(如图28.(3)问)，写出详细解析过程。_百度知道
利用伴随矩阵法求下列方阵的逆矩阵. A=(如图28.(3)问)，写出详细解析过程。
jpg" esrc="http&nbsp.
来自团队：
其他类似问题
为您推荐：
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁导演式记忆矩阵_图文_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
导演式记忆矩阵
上传于||文档简介
&&闲&#8203;云&#8203;的&#8203;导&#8203;演&#8203;式&#8203;记&#8203;忆&#8203;矩&#8203;阵&#8203;,&#8203;转&#8203;自&#8203;中&#8203;国&#8203;记&#8203;忆&#8203;力&#8203;训&#8203;练&#8203;网&#8203;.
阅读已结束，如果下载本文需要使用2下载券
想免费下载本文？
定制HR最喜欢的简历
下载文档到电脑，查找使用更方便
还剩13页未读，继续阅读
定制HR最喜欢的简历
你可能喜欢查看: 6445|回复: 5
在线时间150 小时威望43 金钱252 人气6 最后登录注册时间帖子精华0积分1688阅读权限20UID39820
中级程序员, 积分 1688, 距离下一级还需 312 积分
擂点0 人气6 威望43 注册时间精华0帖子
各位大侠：我是一个老笨初学者，想要一个矩阵求逆的VB6.0的程序，敬请给于帮助。&br /&线性代数上，用初等变换求逆，方法很清楚，也很简单，即&br /&一个A(n,n)的方阵，假定它是可逆的，求其逆矩阵的方法之一：是用初等变换的方法，即在原矩阵之右添加一个相应的单位阵，生成一个A(n,2n)的增广矩阵；用主元除该行的各个元素，使得A(k,k)主元变为1；用主元下面的元素A(k+1,k)乘主元一行的各个元素，反符号与主元下面对应元素相加，将主元这一列，除主元为1外其它都为0；直至原矩阵变为单位阵，增广矩阵的原来单位阵即为它的逆矩阵。&br /&如何将这样手工计算，转变成VB程序，闹不出来，敬请大侠们给于帮助，谢谢！
在线时间754 小时威望368 金钱2086 人气8 最后登录注册时间帖子精华1积分9112阅读权限200UID7793
擂点0 人气8 威望368 注册时间精华1帖子
这是我从书上抄的
Private Function MRinv(N As Integer, mtxA() As Double) As Boolean
'****************************************************************************************
'&&功能：&&实矩阵求逆的全选主元高斯－约当法
'&&参数：&&n& && &- Integer型变量，矩阵的阶数
'& && && & mtxA& &- Double型二维数组，体积为n x n。存放原矩阵A；返回时存放其逆矩阵A-1。
'&&返回值：Boolean型，失败为False，成功为True
'****************************************************************************************
ReDim nIs(N) As Integer, nJs(N) As Integer
Dim i As Integer, j As Integer, k As Integer
Dim D As Double, p As Double
' 全选主元，消元
For k = 1 To N
& & D = 0#
& & For i = k To N
& && &&&For j = k To N
& && && && &p = Abs(mtxA(i, j))
& && && && &If (p & D) Then
& && && && && & D = p
& && && && && & nIs(k) = i
& && && && && & nJs(k) = j
& && && && &End If
& && &&&Next j
& & Next i
& & ' 求解失败
& & If (D + 1# = 1#) Then
& && &&&MRinv = False
& && &&&Exit Function
& & End If
& & If (nIs(k) && k) Then
& && &&&For j = 1 To N
& && && && &p = mtxA(k, j)
& && && && &mtxA(k, j) = mtxA(nIs(k), j)
& && && && &mtxA(nIs(k), j) = p
& && &&&Next j
& & End If
& & If (nJs(k) && k) Then
& && &&&For i = 1 To N
& && && && &p = mtxA(i, k)
& && && && &mtxA(i, k) = mtxA(i, nJs(k))
& && && && &mtxA(i, nJs(k)) = p
& && &&&Next i
& & End If
& & mtxA(k, k) = 1# / mtxA(k, k)
& & For j = 1 To N
& && &&&If (j && k) Then mtxA(k, j) = mtxA(k, j) * mtxA(k, k)
& & Next j
& & For i = 1 To N
& && &&&If (i && k) Then
& && && && &For j = 1 To N
& && && && && & If (j && k) Then mtxA(i, j) = mtxA(i, j) - mtxA(i, k) * mtxA(k, j)
& && && && &Next j
& && &&&End If
& & Next i
& & For i = 1 To N
& && &&&If (i && k) Then mtxA(i, k) = -mtxA(i, k) * mtxA(k, k)
& & Next i
' 调整恢复行列次序
For k = N To 1 Step -1
& & If (nJs(k) && k) Then
& && &For j = 1 To N
& && && & p = mtxA(k, j)
& && && & mtxA(k, j) = mtxA(nJs(k), j)
& && && & mtxA(nJs(k), j) = p
& && &Next j
& & End If
& & If (nIs(k) && k) Then
& && &For i = 1 To N
& && && & p = mtxA(i, k)
& && && & mtxA(i, k) = mtxA(i, nIs(k))
& && && & mtxA(i, nIs(k)) = p
& && &Next i
& & End If
' 求解成功
MRinv = True
End Function
在线时间11 小时威望0 金钱3 人气0 最后登录注册时间帖子精华0积分111阅读权限10UID204137
初级程序员, 积分 111, 距离下一级还需 89 积分
擂点0 人气0 威望0 注册时间精华0帖子
不懂。。。哪位大侠解释一下
在线时间1657 小时威望879 金钱10489 人气430 最后登录注册时间帖子精华0积分22706阅读权限200UID159019
教授级专家
网络设计师, 积分 22706, 距离下一级还需 9294 积分
擂点5 人气430 威望879 注册时间精华0帖子
照着用就是了。不要懂
在线时间1086 小时威望23 金钱9331 人气19 最后登录注册时间帖子精华0积分14654阅读权限150UID188754
网络程序员, 积分 14654, 距离下一级还需 1346 积分
擂点0 人气19 威望23 注册时间精华0帖子
Igawk 发表于
照着用就是了。不要懂
请费心告知如何用？万分的感谢。
在线时间1086 小时威望23 金钱9331 人气19 最后登录注册时间帖子精华0积分14654阅读权限150UID188754
网络程序员, 积分 14654, 距离下一级还需 1346 积分
擂点0 人气19 威望23 注册时间精华0帖子
renyucai1963 发表于
请费心告知如何用？万分的感谢。
(7.85 KB, 下载次数: 808)
09:49 上传
点击文件名下载附件
擂台第65期擂主
擂台第65期擂主查看: 815|回复: 9
如何解决MATLAB中矩阵处理所带来的数值误差？
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。
才可以下载或查看，没有帐号？
怎么解决MATLAB中由于矩阵运算所带来的数值误差，例如：
A1=rand(100)*10^9; A2=rand(100)*10^8; A3=rand(100)*10^6; A4=rand(100)*10^5; A5=rand(100)*10^3;& &&&% 生成5个不同量级的矩阵，维度一致
T=rand(100,32);& && && && &% 生成一个T矩阵
B0=T'*(A1+A2+A3+A4+A5)*T;&&% 先做加法，在做乘法
B1=zeros(32);
& &&&B1=T'*A1*T+B1;& && && && && &&&% 先做乘法，再做加法
Err=B1-B0;& && && && && && && && && && & % 求解两种运算带来的绝对误差
如上面的例子，一般情况下，误差随着数量级的增大，而特别大。
所以，对于矩阵拆分后，不同的运算顺序所带来的误差，应该怎么消除？？？
万分感谢！！！
【更正问题】怎么解决MATLAB中由于矩阵运算所带来的数值误差，例如：
A1=rand(100)*10^9; A2=rand(100)*10^8; A3=rand(100)*10^6; A4=rand(100)*10^5; A5=rand(100)*10^3;& &&&% 生成5个不同量级的矩阵，维度一致
A=A{A1,A2,A3,A4,A5};
T=rand(100,32);& && && && &% 生成一个T矩阵
B0=T'*(A1+A2+A3+A4+A5)*T;&&% 先做加法，在做乘法
B1=zeros(32);
& &&&B1=T'*A{k}*T+B1;& && && && && &&&% 先做乘法，再做加法
Err=B1-B0;& && && && && && && && && && & % 求解两种运算带来的绝对误差
【更正问题】怎么解决MATLAB中由于矩阵运算所带来的数值误差，例如：
A1=rand(100)*10^9; A2=rand(100)*10 ...
可否好奇问下，LZ为何需準到15次方的order
可否好奇问下，LZ为何需準到15次方的order
比如，对于结构分析，其中的物理参数矩阵的数值量级就很大啊
比如，对于结构分析，其中的物理参数矩阵的数值量级就很大啊
估计是矩阵病态造成的，可以考虑变换一下消除矩阵的病态问题，或者采用正则化方法进行求解
<p id="rate_79" onmouseover="showTip(this)" tip="感谢你能够和大家分享经验&体能 + 4 点
" class="mtn mbn">
估计是矩阵病态造成的，可以考虑变换一下消除矩阵的病态问题，或者采用正则化方法进行求解
谢谢，对于您说的&&“变换”&&和&&“正则化方法”&&能够详细点吗？我不是很清楚，不知道怎么处理。
<p id="rate_79" onmouseover="showTip(this)" tip="感谢你能够和大家分享经验&体能 + 4 点
" class="mtn mbn">
本帖最后由 mxlzhenzhu 于
23:28 编辑
谢谢，对于您说的&&“变换”&&和&&“正则化方法”&&能够详细点吗？我不是很清楚，不知道怎么处理。
数值分析经典结论还记得那么几个：
1，大数和小数相加，小数被误差吃掉；
2，大数除以小数，结果不确定，损害有效数字位数；
3，数值算法更喜欢数值积分，而不喜欢数值微分，用数值微分常常不稳定，尽量避免；
4，尽量避免直接求逆，通常用解线性代数方程组，解决求逆问题，为了加速收敛，算法一大堆；
和矩阵是否病态没关系，求逆的时候，病态问题才突出；这是要在计算中尽量避免的；
所以编程和理论还是有些区别的；
楼主有兴趣可以了解一下经典Lanczos算法在Gram-Schmidt正交化过程中，精度丢失的原因，也许对于你现在的兴趣点可能有一些裨益；
<p id="rate_79" onmouseover="showTip(this)" tip="回复具有一定的启发引导性&体能 + 4 点
" class="mtn mbn">
数值分析经典结论还记得那么几个：
1，大数和小数相加，小数被误差吃掉；
2，大数除以小数，结果不确定 ...
非常感谢您的指导，
/view/e525c153ed630b1c58eeb548.html?from=search
Powered by