vb.net矩阵求逆 vb生成矩阵代码

vb.net矩阵的问题

要实现什么样的功能呢?矩阵就是二维表吧,在.Net中有许多方法可以实现二维表,根据不同的需求选择适合的方法,你应该详细一点说明

相关问答

Q1: 怎样用VB编程矩阵求逆

矩阵求逆的VB程序

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

Next k

' 调整恢复行列次序

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

Next k

' 求解成功

MRinv = True

End Function

来源:

Q2: 矩阵的逆怎么计算？

求矩阵的逆常用的有如下三种做法。经济数学团队帮你解答，请及时采纳。谢谢！

一、公式法：A的逆阵=(1/|A|)A*，其中A*是A的伴随阵。

二、初等变换法：对分块矩阵(A,E)做行初等变换，前半部分A化成单位阵E时，后半部分E就化成了A的逆阵。

三、猜测法：如果能通过已知条件得出AB=E或BA=E，则B就是A的逆矩阵。

Q3: 矩阵怎么求逆

矩阵的逆等于伴随矩阵除以矩阵的行列式，所以现在只要求原矩阵的行列式即可。

A^*=A^(-1)|A|,

两边同时取行列式得

|A^*|=|A|^2 （因为是三阶矩阵）

又|A^*|=4,|A|0,所以|A|=2

所以A^(-1)=A^(*)/2,就是伴随矩阵除以2。

特殊求法：

（1）当矩阵是大于等于二阶时 ：

主对角元素是将原矩阵该元素所在行列去掉再求行列式，非主对角元素是原矩阵该元素的共轭位置的元素去掉所在行列求行列式乘以  ， x，y为该元素的共轭位置的元素的行和列的序号，序号从1开始。主对角元素实际上是非主对角元素的特殊情况，因为x=y，所以  ，一直是正数，没必要考虑主对角元素的符号问题。

（2）当矩阵的阶数等于一阶时，伴随矩阵为一阶单位方阵。

（3）二阶矩阵的求法口诀：主对角线元素互换，副对角线元素加负号。

矩阵性质

矩阵是线性代数的主要内容，很多实际问题用矩阵的思想去解既简单又快捷。逆矩阵又是矩阵理论的很重要的内容，逆矩阵的求法自然也就成为线性代数研究的主要内容之一。

设A是数域上的一个n阶方阵，若在相同数域上存在另一个n阶矩B，使得： AB=BA=E。 则我们称B是A的逆矩阵，而A则被称为可逆矩阵。其中，E为单位矩阵。

典型的矩阵求逆方法有：利用定义求逆矩阵、初等变换法、伴随阵法、恒等变形法等。

vb.net矩阵求逆的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vb生成矩阵代码、vb.net矩阵求逆的信息别忘了在本站进行查找喔。