EmguCV学习笔记 VB.Net 2.2 Matrix类

news2024/11/24 10:24:44

 版权声明：本文为博主原创文章，转载请在显著位置标明本文出处以及作者网名，未经作者允许不得用于商业目的。

EmguCV学习笔记目录 Vb.net

EmguCV学习笔记目录 C#

笔者的博客网址：VB.Net-CSDN博客

教程相关说明以及如何获得pdf教程和代码（博客上的教程内容会和pdf教程一致，教程中也会包含所有代码），请移步：EmguCV学习笔记

2.2 Matrix类

Matrix类是EmguCV中的一个矩阵类，它可以用来存储和处理矩阵数据，可以处理任意维度的矩阵。与Mat类相比，Matrix类提供了更多的矩阵运算方法，如矩阵加减、乘法、逆矩阵等，也更加灵活，而且底层实现也更加高效。

通常而言，Matrix类应为Matrix（Of 数据类型）的形式，其中数据类型指明了该矩阵中元素的存储类型，包括Byte、Integer、Single等。

2.2.1 构造函数

为了显示Matrix的结果，请在窗体上放置一个MatrixBox控件。该控件位于【工具箱】|【Emgu.CV】下面。另外，

1、使用一维数组初始化Matrix：

【代码位置：frmChapter2_1】Button1_Click

    'Matrix构造函数：一维数组初始化Matrix

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        Dim inputBytes() As Byte = New Byte() {1, 2, 3, 4, 5, 6, 7, 8, 9}

        Dim matr As New Matrix(Of Byte)(inputBytes)

        MatrixBox1.Matrix = matr

    End Sub

显示结果如下：

图2-2 一维数组初始化Matrix

2、使用二维数组初始化Matrix：

【代码位置：frmChapter2_1】Button2_Click

    'Matrix构造函数：二维数组初始化Matrix

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click

        Dim inputBytes(,) As Byte = New Byte(,) {{1, 2, 3}, {3, 4, 5}, {5, 6, 7}, {7, 8, 9}}

        Dim matr As New Matrix(Of Byte)(inputBytes)

        MatrixBox1.Matrix = matr

    End Sub

显示结果如下：

图2-3 二维数组初始化Matrix

3、指定大小初始化Matrix，然后写入值：

【代码位置：frmChapter2_1】Button3_Click

    'Matrix构造函数：初始化矩阵的大小（Size）

    '注意使用size的话，width是列，height是行，列在前，行灾后

    '以下创建的是一个2列4行的矩阵

    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click

        Dim inputBytes() As Byte = New Byte() {1, 2, 3, 4, 5, 6, 7, 8}

        Dim matr As New Matrix(Of Byte)(New Size(2, 4))

        For i As Integer = 0 To 1

            For j As Integer = 0 To 3

                matr(j, i) = inputBytes(i * 4 + j)

            Next

        Next

        MatrixBox1.Matrix = matr

    End Sub

先是初始化一个2列（Width）4行（Height）的矩阵，然后使用循环，将数组的数据写入矩阵。

显示结果如下：

图2-4 指定大小初始化Matrix

也可以通过SetValue方法设置相同的值：

【代码位置：frmChapter2_1】Button4_Click

    'Matrix构造函数：初始化矩阵的大小（Size）

    Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click

        Dim matr As New Matrix(Of Byte)(New Size(2, 4))

        '将所有元素设置相同的指定值

        matr.SetValue(New MCvScalar(20))

        MatrixBox1.Matrix = matr

    End Sub

显示结果如下：

 

图2-5 对Matrix的元素设置相同的值

4、指定行、列、通道初始化Matrix，并将向每个通道写入相同的值：

【代码位置：frmChapter2_1】Button5_Click

    'Matrix构造函数：行、列、通道初始化矩阵

    Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click

        'row是行，col是列，行在前，列在后

        '以下创建的是一个2列4行3通道的矩阵

        Dim matr As New Matrix(Of Byte)(4, 3, 3)

        '设置各个通道的元素的值

        matr.SetValue(New MCvScalar(20, 30, 40))

        MatrixBox1.Matrix = matr

End Sub

显示结果如下：

 

图2-6 对多通道Matrix的元素设置相同的值

注意:这个构造函数和通过Size方式初始化Matrix的构造函数有所区别的是，行和列出现的先后不同。Size(列，行)，而这个是行、列、通道。

这里对Matrix元素的每个通道设置了值，在MatrixBox控件中可以在channel处下拉选择查看不同通道的值。

5、指定行、列、通道初始化Matrix，并将每个通道的值设置为0：

【代码位置：frmChapter2_1】Button6_Click

    'Matrix元素的值全部设置为0（多通道设置每个通道为0）

    Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click

        Dim matr As New Matrix(Of Byte)(4, 3, 3)

        matr.SetZero()

        MatrixBox1.Matrix = matr

End Sub

显示结果如下：

图2-7 设置多通道Matrix的元素的值为0

2.2.2 获取Matrix元素的值

在以下代码中提供了3种方法来获取Matrix指定位置(行,列)的值。

【代码位置：frmChapter2_1】Button7_Click

    Private Sub Button7_Click(sender As Object, e As EventArgs) Handles Button7.Click

        Dim inputBytes(,) As Byte = New Byte(,) {{1, 2, 3}, {3, 4, 5}, {5, 6, 7}, {7, 8, 9}}

        Dim matr As New Matrix(Of Byte)(inputBytes)

        MatrixBox1.Matrix = matr

        '方法1：直接使用Matrix(行,列)进行输出，使用时需要注意行列的顺序

        For i As Integer = 0 To matr.Rows 1

            For j As Integer = 0 To matr.Cols 1

                '通过matr(i,j)获得值的方式只适用于单通道矩阵

                TextBox1.Text &= matr(i, j) & " "

            Next

            TextBox1.Text &= vbCrLf

        Next

        TextBox1.Text &= "====================" & vbCrLf

        '方法2：先读取到一维数组，再输出

        Dim outputBytes1() As Byte

        outputBytes1 = matr.Bytes

        Dim height As Integer = matr.Rows

        Dim width As Integer = matr.Cols

        For i As Integer = 0 To height 1

            For j As Integer = 0 To width 1

                TextBox1.Text &= outputBytes1(i * width + j) & " "

            Next

            TextBox1.Text &= vbCrLf

        Next

        TextBox1.Text &= "====================" & vbCrLf

        '方法3：先读取到二维数组，再输出

        Dim outputBytes2(,) As Byte

        outputBytes2 = matr.Data

        '这里是二维数组，所以返回2

        Dim outputBytesRank As Integer = outputBytes2.Rank

        For i As Integer = 0 To outputBytes2.GetLength(0) 1

            For j As Integer = 0 To outputBytes2.GetLength(1) 1

                TextBox1.Text &= outputBytes2(i, j) & " "

            Next

            TextBox1.Text &= vbCrLf

        Next

End Sub

注意：只适合单通道Matrix。对于多通道Matrix需要将其分解成多个单通道Matrix再进行处理。

显示结果如下：

 

图2-8 读取单通道矩阵元素的值

2.2.3 Matrix的拆分

使用Matrix的Split方法将多通道矩阵拆分为单通道矩阵。

【代码位置：frmChapter2_1】Button8_Click

    '将多通道Matrix拆分为多个单通道Matrix

    Private Sub Button8_Click(sender As Object, e As EventArgs) Handles Button8.Click

        Dim matr As New Matrix(Of Byte)(4, 2, 3)

        matr.SetValue(New MCvScalar(20, 30, 40))

        Dim arrMatr() As Matrix(Of Byte)

        '使用Split方法拆分多通道矩阵到矩阵数组。

        arrMatr = matr.Split()

        '显示第一个通道的值

        MatrixBox1.Matrix = arrMatr(0)

    End Sub

显示结果如下：

 

图2-9 Matrix第一个通道的值

2.2.4 Matrix的运算

2.2.4.1 加法

1、加一个数值

【代码位置：frmChapter2_1】Button9_Click

    'Matrix的加法1：增加一个固定值

    Private Sub Button9_Click(sender As Object, e As EventArgs) Handles Button9.Click

        Dim inputBytes(,) As Byte = New Byte(,) {{1, 2, 3}, {3, 4, 5}, {5, 6, 7}, {7, 8, 9}}

        Dim matr1 As New Matrix(Of Byte)(inputBytes)

        Dim matr2 As Matrix(Of Byte)

        '方法1：

        matr2 = matr1 + 30

        '方法2：

        'matr2 = matr1.Add(30)

        MatrixBox1.Matrix = matr2

End Sub

显示结果如下：

 

图2-10 Matrix增加一个固定值

2、两个单通道矩阵相加

【代码位置：frmChapter2_1】Button10_Click

    'Matrix的加法2：两个单通道矩阵相加

    Private Sub Button10_Click(sender As Object, e As EventArgs) Handles Button10.Click

        Dim inputBytes1(,) As Byte = New Byte(,) {{1, 2, 3}, {3, 4, 5}, {5, 6, 7}, {7, 8, 9}}

        Dim inputBytes2(,) As Byte = New Byte(,) {{3, 4, 5}, {5, 6, 7}, {7, 8, 9}, {9, 10, 11}}

        Dim matr1 As New Matrix(Of Byte)(inputBytes1)

        Dim matr2 As New Matrix(Of Byte)(inputBytes2)

        Dim matr3 As New Matrix(Of Byte)(4, 3, 1)

        '方法1：

        matr3 = matr1 + matr2

        '方法2：

        'matr3 = matr1.Add(matr2)

        '方法3：

        'CvInvoke.Add(matr1, matr2, matr3)

        MatrixBox1.Matrix = matr3

End Sub

显示结果如下：

 

图2-11 两个单通道矩阵相加

注意：如果使用方法3，那么必须初始化matr3，否则可以不用初始化，即：

Dim matr3 As Matrix(Of Byte)

下同。

3、两个多通道矩阵相加

【代码位置：frmChapter2_1】Button11_Click

    'Matrix的加法3：两个多通道矩阵相加

    Private Sub Button11_Click(sender As Object, e As EventArgs) Handles Button11.Click

        Dim matr1 As New Matrix(Of Byte)(4, 3, 3)

        matr1.SetValue(New MCvScalar(20, 30, 40))

        Dim matr2 As New Matrix(Of Byte)(4, 3, 3)

        matr2.SetValue(New MCvScalar(50, 20, 240))

        Dim matr3 As New Matrix(Of Byte)(4, 3, 3)

        '方法1：

        matr3 = matr1 + matr2

        '方法2：

        'matr3 = matr1.Add(matr2)

        '方法3：

        'CvInvoke.Add(matr1, matr2, matr3)

        MatrixBox1.Matrix = matr3

End Sub

显示结果如下：

 

图2-12 两个多通道矩阵相加

2.2.4.2 减法

1、减一个数值

【代码位置：frmChapter2_1】Button12_Click

    'Matrix的减法1：减去一个固定值

    Private Sub Button12_Click(sender As Object, e As EventArgs) Handles Button12.Click

        Dim inputBytes(,) As Byte = New Byte(,) {{1, 2, 3}, {3, 4, 5}, {5, 6, 7}, {7, 8, 9}}

        Dim matr1 As New Matrix(Of Byte)(inputBytes)

        Dim matr2 As Matrix(Of Byte)

        '方法1：

        matr2 = matr1-3

        '方法2：

        'matr2 = matr1.Sub(3)

        MatrixBox1.Matrix = matr2

End Sub

显示结果如下：

图2-13 Matrix减去一个固定值

还有一个反向减法的方法，读者可以测试将以上代码中的

matr2 = matr1.Sub(3)

替换为：

matr2 = matr1.SubR(30)

进行测试。

2、两个单通道矩阵相减

【代码位置：frmChapter2_1】Button13_Click

    'Matrix的减法2：两个单通道矩阵相减

    Private Sub Button13_Click(sender As Object, e As EventArgs) Handles Button13.Click

        Dim inputBytes1(,) As Byte = New Byte(,) {{1, 2, 3}, {3, 4, 5}, {5, 6, 7}, {7, 8, 9}}

        Dim inputBytes2(,) As Byte = New Byte(,) {{3, 4, 5}, {5, 6, 7}, {7, 8, 9}, {9, 10, 21}}

        Dim matr1 As New Matrix(Of Byte)(inputBytes1)

        Dim matr2 As New Matrix(Of Byte)(inputBytes2)

        Dim matr3 As New Matrix(Of Byte)(4, 3, 1)

        '方法1：

        matr3 = matr2 matr1

        '方法2：

        'matr3 = matr2.Sub(matr1)

        '方法3：

        'CvInvoke.Subtract(matr2, matr1, matr3)

        MatrixBox1.Matrix = matr3

End Sub

显示结果如下：

 

图2-14 两个单通道矩阵相减

3、两个多通道矩阵相减

【代码位置：frmChapter2_1】Button14_Click

    'Matrix的减法3：两个多通道矩阵相减

    Private Sub Button14_Click(sender As Object, e As EventArgs) Handles Button14.Click

        Dim matr1 As New Matrix(Of Byte)(4, 3, 3)

        matr1.SetValue(New MCvScalar(20, 30, 40))

        Dim matr2 As New Matrix(Of Byte)(4, 3, 3)

        matr2.SetValue(New MCvScalar(50, 20, 240))

        Dim matr3 As New Matrix(Of Byte)(4, 3, 3)

        '方法1：

        matr3 = matr2 matr1

        '方法2：

        'matr3 = matr2.Sub(matr1)

        '方法3：

        'CvInvoke.Subtract(matr2, matr1, matr3)

        MatrixBox1.Matrix = matr3

End Sub

显示结果如下：

 

图2-15 两个多通道矩阵相减

2.2.4.3 乘法

1、乘以一个数值

【代码位置：frmChapter2_1】Button15_Click

    'Matrix的乘法1：乘以一个固定值

    Private Sub Button15_Click(sender As Object, e As EventArgs) Handles Button15.Click

        Dim inputBytes(,) As Byte = New Byte(,) {{1, 2, 3}, {3, 4, 5}, {5, 6, 7}, {7, 8, 9}}

        Dim matr1 As New Matrix(Of Byte)(inputBytes)

        Dim matr2 As Matrix(Of Byte)

        '方法1：

        matr2 = matr1 * 3

        '方法2：

        'matr2 = matr1.Mul(3)

        MatrixBox1.Matrix = matr2

End Sub

显示结果如下：

图2-16 Matrix乘以一个数值

2、两个单通道矩阵相乘

注意：两个矩阵相乘必须满足一定条件

1、第一个Matrix的列数应等于第二个Matrix的行数，生成结果为

列数=第二个Matrix的列数

行数=第一个Matrix的行数

2、数据类型要一致，整数型数据（包括Byte、Integer、Long、Int16、Int32、Int64等）不能进行乘法运算，浮点型数据（Single、Double）可以参与运算。

【代码位置：frmChapter2_1】Button16_Click

    'Matrix的乘法2：两个单通道矩阵相乘

    Private Sub Button16_Click(sender As Object, e As EventArgs) Handles Button16.Click

        '4列2行

        Dim inputBytes1(,) As Single = New Single(,) {{1, 2, 3, 4}, {3, 4, 5, 6}}

        '3列4行

        Dim inputBytes2(,) As Single = New Single(,) {{1, 2, 3}, {3, 4, 5}, {5, 6, 7}, {7, 8, 9}}

        Dim matr1 As New Matrix(Of Single)(inputBytes1)

        Dim matr2 As New Matrix(Of Single)(inputBytes2)

        '生成3列2行

        Dim matr3 As Matrix(Of Single)

        '方法1：

        matr3 = matr1 * matr2

        '方法2：

        'matr3 = matr1.Mul(matr2)

        MatrixBox1.Matrix = matr3

End Sub

显示结果如下：

图2-17 两个单通道矩阵相乘

3、两个多通道矩阵相乘

两个多通道矩阵似乎不能直接相乘

4、两个矩阵对应元素相乘

这个方法将两个矩阵对应坐标位置的元素相乘，有别于标准的矩阵乘法。

【代码位置：frmChapter2_1】Button17_Click

    'Matrix的乘法3：行列对应元素相乘，不同于普通的矩阵乘法

    Private Sub Button17_Click(sender As Object, e As EventArgs) Handles Button17.Click

        Dim inputBytes1(,) As Byte = New Byte(,) {{1, 2, 3}, {3, 4, 5}, {5, 6, 7}, {7, 8, 9}}

        Dim inputBytes2(,) As Byte = New Byte(,) {{3, 4, 5}, {5, 6, 7}, {7, 8, 9}, {9, 10, 11}}

        Dim matr1 As New Matrix(Of Byte)(inputBytes1)

        Dim matr2 As New Matrix(Of Byte)(inputBytes2)

        matr1._Mul(matr2)

        MatrixBox1.Matrix = matr1

    End Sub

显示结果如下：

 

图2-18 两矩阵对应元素相乘

2.2.4.4 除法

【代码位置：frmChapter2_1】Button18_Click

    'Matrix的除法

    Private Sub Button17_Click(sender As Object, e As EventArgs) Handles Button17.Click

        Dim inputBytes(,) As Single = New Single(,) {{1, 2, 3}, {3, 4, 5}, {5, 6, 7}, {7, 8, 9}}

        Dim matr1 As New Matrix(Of Single)(inputBytes)

        Dim matr2 As Matrix(Of Single)

        matr2 = matr1 / 3

        MatrixBox1.Matrix = matr2

    End Sub

显示结果如下：

 

图2-19 Matrix除以一个数值

2.2.4.5 Not运算

【代码位置：frmChapter2_1】Button19_Click

    '矩阵的Not

    Private Sub Button19_Click(sender As Object, e As EventArgs) Handles Button19.Click

        Dim inputBytes1(,) As Byte = New Byte(,) {{1, 2, 3}, {3, 4, 5}, {5, 6, 7}, {7, 8, 9}}

        Dim matr1 As New Matrix(Of Byte)(inputBytes1)

        matr1._Not()

        MatrixBox1.Matrix = matr1

    End Sub

显示结果如下：

 

图2-20 Matrix的Not运算

读者可自行对比Byte数据类型和Short、Integer等类型生成的结果。

2.2.5 Matrix拼接

Matrix提供了ConcateHorizontal、ConcateVertical方法将两个矩阵拼接为一个矩阵。

  1. ConcateHorizontal：水平方向拼接，必须具备相同行数。
  2. ConcateVertical：垂直方向拼接，必须具备相同列数

【代码位置：frmChapter2_1】Button20_Click

    '矩阵的水平方向拼接，必须具备相同行数

    Private Sub Button20_Click(sender As Object, e As EventArgs) Handles Button20.Click

        Dim inputBytes1(,) As Byte = New Byte(,) {{1, 2, 3}, {3, 4, 5}, {5, 6, 7}, {7, 8, 9}}

        Dim inputBytes2(,) As Byte = New Byte(,) {{3, 4}, {5, 6}, {7, 8}, {9, 10}}

        Dim matr1 As New Matrix(Of Byte)(inputBytes1)

        Dim matr2 As New Matrix(Of Byte)(inputBytes2)

        Dim matr3 As Matrix(Of Byte)

        matr3 = matr1.ConcateHorizontal(matr2)

        MatrixBox1.Matrix = matr3

    End Sub

显示结果如下：

 

图2-21 Matrix水平方向拼接

【代码位置：frmChapter2_1】Button21_Click

    '矩阵的垂直方向拼接，必须具备相同列数

    Private Sub Button21_Click(sender As Object, e As EventArgs) Handles Button21.Click

        Dim inputBytes1(,) As Byte = New Byte(,) {{1, 2, 3}, {3, 4, 5}, {5, 6, 7}, {7, 8, 9}}

        Dim inputBytes2(,) As Byte = New Byte(,) {{3, 4， 5}, {5, 6， 7}, {7, 8， 9}}

        Dim matr1 As New Matrix(Of Byte)(inputBytes1)

        Dim matr2 As New Matrix(Of Byte)(inputBytes2)

        Dim matr3 As Matrix(Of Byte)

        matr3 = matr1.ConcateVertical(matr2)

        MatrixBox1.Matrix = matr3

    End Sub

显示结果如下：

 

图2-22 Matrix垂直方向拼接

2.2.6 随机矩阵

Matrix类提供了SetRandNormal方法来生成指定大小、类型和均值方差的随机矩阵。该方法声明如下：

Public Sub SetRandNormal(mean As MCvScalar, stdDev As MCvScalar)

其中参数：

  1. mean：均值，表示随机矩阵的平均值。在正态分布中，均值是分布的中心位置。均值越大，生成的随机矩阵的像素值越偏向于均值。
  2. stdDev：标准差，表示随机矩阵的离散程度。在正态分布中，标准差越大，生成的随机矩阵的像素值越分散。标准差越小，生成的随机矩阵的像素值越接近于均值。

可以通过调整均值和标准差的值来控制生成的随机矩阵的像素值分布。例如，当均值为0，标准差为1时，生成的随机矩阵的像素值符合标准正态分布。当均值为0，标准差为0.5时，生成的随机矩阵的像素值分布更加集中，更接近于均值。

使用SetRandNormal方法生成随机矩阵：

【代码位置：frmChapter2_1】Button22_Click

    '随机矩阵

    Private Sub Button22_Click(sender As Object, e As EventArgs) Handles Button22.Click

        Dim matr As New Matrix(Of Byte)(2, 4, 3)

        matr.SetRandNormal(New MCvScalar(12, 33, 123), New MCvScalar(134, 12, 222))

        MatrixBox1.Matrix = matr

    End Sub

显示结果如下：

图2-23 随机矩阵

注意：SetRandNormal方法只能生成正态分布的随机矩阵，不能生成其他分布的随机矩阵。

2.2.7 最大值和最小值

Matrix类提供了MinMax方法获得矩阵内最大值、最小值以及对应的坐标位置。

【代码位置：frmChapter2_1】Button23_Click

    '最大最小值

    Private Sub Button23_Click(sender As Object, e As EventArgs) Handles Button23.Click

        Dim inputBytes1(,) As Byte = New Byte(,) {{1, 2, 3}, {3, 4, 9}, {5, 6, 7}, {7, 8, 9}}

        Dim matr1 As New Matrix(Of Byte)(inputBytes1)

        MatrixBox1.Matrix = matr1

        '最小值

        Dim minValue As Double

        '最大值

        Dim maxValue As Double

        '最小值坐标：有多个最小值时，只返回第一个的坐标

        Dim minPoint As Point

        '最大值坐标：有多个最大值时，只返回第一个的坐标

        Dim maxPoint As Point

        matr1.MinMax(minValue, maxValue, minPoint, maxPoint)

        TextBox1.Text &= minValue & vbCrLf

        TextBox1.Text &= maxValue & vbCrLf

        TextBox1.Text &= minPoint.X & " " & minPoint.Y & vbCrLf

        TextBox1.Text &= maxPoint.X & " " & maxPoint.Y

    End Sub

显示结果如下：

 

图2-24 最大值最小值以及对应坐标

2.2.8 类型转换

Matrix类提供了Convert方法实现矩阵类型的转换。

【代码位置：frmChapter2_1】Button24_Click

    '类型转换

    Private Sub Button24_Click(sender As Object, e As EventArgs) Handles Button24.Click

        Dim inputBytes1(,) As Double = New Double(,) {{1.2, 2.2, 3.3}, {3.3, 4.4, 5.5}, {5.5, 6.6, 7.7}, {7.7, 8.8, 9.9}}

        Dim matr1 As New Matrix(Of Double)(inputBytes1)

        Dim matr2 As New Matrix(Of Byte)(matr1.Size)

        '小数转整数会四舍五入

        matr2 = matr1.Convert(Of Byte)()

        MatrixBox1.Matrix = matr2

    End Sub

显示结果如下：

 

图2-25 从Double转Byte

2.2.9 获得指定范围的子矩阵

Matrix类提供了Convert方法实现获得指定范围的子矩阵。其中参数是一个Rectangle类型，指定了子矩阵的开始位置、列数、行数。

【代码位置：frmChapter2_1】Button25_Click

    '获得子矩阵

    Private Sub Button25_Click(sender As Object, e As EventArgs) Handles Button25.Click

        Dim inputBytes1(,) As Byte = New Byte(,) {{1, 2, 3}, {4, 5, 6}, {7, 8, 9}, {10, 11, 12}}

        Dim matr1 As New Matrix(Of Byte)(inputBytes1)

        Dim matr2 As New Matrix(Of Byte)(3, 2)

        '获得从指定位置（1,1）开始，列数为2，行数为3的子矩阵

        matr2 = matr1.GetSubRect(New Rectangle(1, 1, 2, 3))

        MatrixBox1.Matrix = matr2

    End Sub

显示结果如下：

 

图2-26 获得指定范围的子矩阵

2.2.10 其他方法

Matrix类还提供了以下常用方法，由于比较简单，不再这里赘述：

  1. Clone：复制Matrix，目标矩阵和源矩阵具有相同的行、列和通道数，元素的值也相同。
  2. CopyBlank：复制Matrix，目标矩阵和源矩阵具有相同的行、列和通道数，但里面元素的值都为0。
  3. GetCol：从源矩阵得到其中一列，并生成新的子矩阵。
  4. GetCols：从源矩阵得到几列的子矩阵。
  5. GetRow：从源矩阵得到其中一行，并生成新的子矩阵。
  6. GetRows：从源矩阵得到几行的子矩阵。
  7. RemoveCols：删除几列的后生成子矩阵。
  8. RemoveRows：删除几行的后生成子矩阵。

本文来自互联网用户投稿，该文观点仅代表作者本人，不代表本站立场。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如若转载，请注明出处：http://www.coloradmin.cn/o/2043752.html

如若内容造成侵权/违法违规/事实不符，请联系多彩编程网进行投诉反馈，一经查实，立即删除！

相关文章

*(论文解读)Prompt-Based Distribution Alignment for Unsupervised Domain Adaptation

*(论文解读)Prompt-Based Distribution Alignment for Unsupervised Domain Adaptation

Prompt-Based Distribution Alignment for Unsupervised Domain Adaptation 用于UDA的基于提示的分布对齐（二区论文） 摘要 近年来，尽管大型视觉语言模型（VLM）在大规模的下游任务中取得了前所未有的成功，…
阅读更多...
HTML标签简明通俗教程

HTML标签简明通俗教程

HTML标签简明通俗教程 基本知识 HTML：是超文本标记语言（Hyper Text Markup Language）的缩写，它是用于创建网页的标准标记语言。标签是构成HTML文档的基本单位。 【HTML中的标签（tag）和元素（e…
阅读更多...
一款手机壳凭什么卖800元？Casetify品牌策略全解析 | 品牌出海

一款手机壳凭什么卖800元？Casetify品牌策略全解析 | 品牌出海

Casetify官网 巴黎奥运会，张怡宁的手机壳火了。 张怡宁在现场观战并使用手机的照片在网上流传，不是因为这位奥运前冠军，而是她的手机壳。这款满是「花花绿绿」图案的手机壳，迅速被网友发掘出是Casetify品牌的名为「炫彩花卉」的…
阅读更多...
Windosw下Visual Studio2022编译OpenCV

Windosw下Visual Studio2022编译OpenCV

OpenCV（Open Source Computer Vision Library）是一个开源的计算机视觉和机器学习软件库。它提供了一系列用于处理图像和视频的算法和函数，包括图像处理、特征检测、物体识别、人脸识别等。OpenCV支持多种编程语言，如C、Python、Ja…
阅读更多...
从源码到应用：医疗陪诊系统与在线问诊小程序开发详解

从源码到应用：医疗陪诊系统与在线问诊小程序开发详解

在数字化医疗时代，医疗陪诊系统与在线问诊小程序的开发成为了医疗机构和技术公司关注的焦点。接下来，小编将与您一同深入了解。 一、医疗陪诊系统的核心功能 医疗陪诊系统旨在为患者提供更贴心的医疗服务，通过专业人员陪同患者完成就医过程。…
阅读更多...
谷歌如何增加网站被收录的机会？

谷歌如何增加网站被收录的机会？

要增加网站被搜索引擎收录的机会，你需要采取一些有效的措施，要确保网站的内容质量高，内容质量不高的内容，哪怕被收录了，之后也是有很大概率会掉的，必须确保内容对用户是有价值的，并且是原创的&a…
阅读更多...
ppt文件批量设置打开权限密码的方法

ppt文件批量设置打开权限密码的方法

为PPT文件批量设置打开权限密码，可以通过Office软件内置的功能或借助第三方软件来实现。对于少量文件可以用PPT内置的密码设置功能实现，但是对于文件比较多的情况下必须要用到第三方的软件来进行批量设置，以下是一些方法。 一、使用Office软件…
阅读更多...
立式报工台助力MES系统打造智能硬件解决方案

立式报工台助力MES系统打造智能硬件解决方案

信息化与自动化的深度结合，使得企业在生产效率、质量控制以及资源管理等方面得以大幅提升。制造执行系统MES作为连接企业管理层与生产现场的重要桥梁，正在愈发得到重视。为了进一步强化MES系统的功能与应用，立式报工台作为一种新兴的智能硬件…
阅读更多...
【网络】TCP协议面向字节流和粘包问题

【网络】TCP协议面向字节流和粘包问题

目录 面向字节流 粘包问题 解决粘包问题的方法 个人主页：东洛的克莱斯韦克-CSDN博客 面向字节流 TCP是一种面向字节流的协议，这意味着TCP并不将传输的数据视为独立的消息或报文，而是将其视为一个连续的字节序列。在TCP连接中，发…
阅读更多...
通过AI帮我分析实现的2019销售季度对比叠加图

通过AI帮我分析实现的2019销售季度对比叠加图

话不多说,看效果 1)先准备销售表内容:高手自测.xlsx 2)向kimi上传文件,并提问 3)得出结果,代码如下: import pandas as pd from pyecharts.charts import Bar, Line, Overlap from pyecharts import options as opts# 读取Excel文件 df pd.read_excel(高手自测3.xlsx)# 数据预…
阅读更多...
jenkins工具配置

jenkins工具配置

上一篇（https://blog.csdn.net/abc666_666/article/details/141207741）文章我们介绍了基于docker安装jenkins的过程，本文将介绍如何配置jenkins的相关全局工具如maven、 jdk以及git等 配置的页面如下： 打开后的页面如下&#xff…
阅读更多...
JookDB和MobaXterm下载安装使用

JookDB和MobaXterm下载安装使用

文章目录 1.使用背景2.MobaXterm的下载安装使用3.JooKDB的下载安装使用 1.使用背景 由于xshell和xftp等工具都是收费的，即使有破解版但是有的公司里不让用盗版的软件。可以使用MobaXterm来替代。 同理可使用JooKDB来代替收费的navicat 来连接数据库。 2.MobaXterm…
阅读更多...
机器学习深度学习中的搜索算法浅谈

机器学习深度学习中的搜索算法浅谈

机器学习&深度学习中的搜索算法浅谈 搜索算法是计算机科学中的核心算法，用于在各种数据结构（如数组、列表、树、图等）中查找特定元素或信息。这些算法不仅在理论上具有重要意义，还在实际应用中扮演着关键角色。本文将详细探讨…
阅读更多...
vulnhub靶机：DC-4

vulnhub靶机：DC-4

目录 导入靶机 信息收集 发现IP 目录扫描 端口扫描 访问 web 弱口令爆破 反弹shell 获得交互式 shell 提权 使用 hydra 暴力破解 SSH 连接 jim 用户 登录charles账户 使用 teehee 创建 root 用户 导入靶机 点击重试 然后网卡换成 NAT模式，开启靶机 信息…
阅读更多...
web前端之实现霓虹灯背景魔术卡、旋转的背景动画、模糊效果、边框、变量、filter

web前端之实现霓虹灯背景魔术卡、旋转的背景动画、模糊效果、边框、变量、filter

MENU 前言效果图htmlstyle 前言 代码段定义一个名为Magic Card的卡片&#xff0c;并通过一系列CSS属性和动画效果来美化和增强该卡片的视觉效果。 效果图 html <div class"card">Magic Card </div>style 代码 property --rotate {syntax: "<a…
阅读更多...
EasyCVR视频汇聚平台：深度解析GB/T 28181协议下的视频资源整合与应用

EasyCVR视频汇聚平台：深度解析GB/T 28181协议下的视频资源整合与应用

随着安防技术的快速发展和智慧城市建设的推进&#xff0c;视频监控系统作为公共安全、城市管理、企业运营等领域的重要基础设施&#xff0c;其重要性和应用范围不断扩大。在这一过程中&#xff0c;GB/T 28181作为国家标准中关于视频监控设备通信协议的规范&#xff0c;正逐渐受…
阅读更多...
DatawhaleAI夏令营 多模态大模型

DatawhaleAI夏令营 多模态大模型

任务讲解 此次的任务和一般以模型为中心的任务不同&#xff0c;是以数据为核心的。要求在官方给定的数据集的基础上进行数据清洗和数据合成&#xff0c;生成更为优质的数据集&#xff0c;以提高多模态模型的性能。&#xff08;此次的模型以图文能力为主&#xff09; 我们将会…
阅读更多...
搜维尔科技：驾驶模拟器背后的技术： Varjo的虚拟/混合现实 (VR/XR)提供独特的优势，最终加快汽车开发创新的步伐

搜维尔科技：驾驶模拟器背后的技术： Varjo的虚拟/混合现实 (VR/XR)提供独特的优势，最终加快汽车开发创新的步伐

专业驾驶模拟器广泛应用于车辆开发&#xff0c;帮助汽车行业在开发过程的早期做出更好的设计决策。总体目标是为测试驾驶员提供最真实的驾驶体验&#xff0c;包括动态动作和声音&#xff0c;并测试控制算法或辅助系统等功能。环境越真实&#xff0c;驾驶员的体验就越接近最终车…
阅读更多...
[vue] pdf.js / vue-pdf 文件花屏问题

[vue] pdf.js / vue-pdf 文件花屏问题

vue-pdf内核也是pdf.js&#xff0c;修改方式一样 在pdf.worker.js中加入几行代码&#xff0c;追加到”precinct.zeroBitPlanesTree zeroBitPlanesTree;“之后。 for (var l 0; l < layerNumber; l) {if (readBits(1) ! 0) {throw new JpxError("Invalid tag tree&qu…
阅读更多...
vba代码插入折线图

vba代码插入折线图

xqwertyy52152018139hi303533312015 Sub test()Set sht1 ThisWorkbook.Worksheets("示例")x sht1.Range("I1").Lefty sht1.Range("I1").Topw sht1.Range("N15").Width * 15h sht1.Range("N15").Height * 25Set ch1 s…
阅读更多...
推荐文章
最新文章

Copyright @ 2022~2023