EmguCV学习笔记 VB.Net 4.2 二值化

embedded/2024/12/23 14:42:20/

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

教程VB.net版本请访问:
EmguCV学习笔记 VB.Net 目录-CSDN博客

教程C#版本请访问:EmguCV学习笔记 C# 目录-CSDN博客

笔者的博客网址:https://blog.csdn.net/uruseibest

教程配套文件及相关说明以及如何获得pdf教程和代码(博客上的教程内容会和pdf教程一致,教程中也会包含所有代码),请移步:EmguCV学习笔记

4.2 二值化

4.2.1 Threshold    

Threshold方法用于对图像进行二值化处理,将图像中的像素值转换为0或255,以便于后续的图像分割、形状检测等处理。该方法只能处理灰度图像,如果要对彩色图像进行二值化处理,需要先将其转换为灰度图像。此外,在使用Threshold方法时,还需要根据实际情况选择不同的二值化操作类型,以达到最佳的处理效果。

Threshold的声明如下:

Public Shared Function Threshold(src As Emgu.CV.IInputArray, dst As Emgu.CV.IOutputArray, threshold As Double, maxValue As Double, thresholdType As Emgu.CV.CvEnum.ThresholdType) As Double

参数说明:

  1. src:原始图像,通常是Mat类型。
  2. dst:输出图像,通常是Mat类型。
  3. thresh:阈值,Double类型。
  4. maxval:最大值,Double类型,在二值化操作中,将大于阈值的像素值设为该值。
  5. type:二值化操作的类型,ThresholdType类型,包括以下常量:
  1. Binary:二值化操作,将大于阈值的像素值设为maxval,小于等于阈值的像素值设为0。
  2. BinaryInv:反向二值化操作,将小于等于阈值的像素值设为maxval,大于阈值的像素值设为0。
  3. Trunc:截断操作,将大于阈值的像素值设为阈值,小于等于阈值的像素值不变。
  4. ToZero:零值操作,将小于等于阈值的像素值设为0,大于阈值的像素值不变。
  5. ToZeroInv:反向零值操作,将大于阈值的像素值设为0,小于等于阈值的像素值不变。
  6. Otsu:使用大津法,通过分析图像的灰度直方图,自动确定最佳的阈值,从而实现二值化,可以适用于大部分图像的二值化处理。如果使用了此类型,那么thresh参数将忽略。
  7. Triangle:使用Triangle算法,通过寻找直方图中的三角形区域,自动确定最佳的阈值,从而实现二值化。如果使用了此类型,那么thresh参数将忽略。

返回值:

返回ThresholdType为Otsu 或Triangle时,确定的最佳阈值(threshold的参数的值);如果ThresholdType不是Otsu 或Triangle,那么就返回设定的阈值。

【代码位置:frmChapter4】Button2_Click

    'Threshold

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

'可以直接使用ImreadModes.Grayscale,这里为了直观对比使用彩色图像       

Dim m As New Mat("C:\learnEmgucv\lena.jpg", ImreadModes.Color)

        ImageBox1.Image = m

        '灰度转换

        Dim mgray As New Mat

        CvInvoke.CvtColor(m, mgray, ColorConversion.Bgr2Gray)

        Dim mOut1 As New Mat

        '使用Binary类型进行二值化

        CvInvoke.Threshold(mgray, mOut1, 125, 255, ThresholdType.Binary)

        ImageBox2.Image = mOut1

        Dim mOut2 As New Mat

        Dim thresh As Double

        '使用大律法自动确定阈值进行二值化,并返回使用Otsu计算出的阈值

        thresh = CvInvoke.Threshold(mgray, mOut2, 0, 255, ThresholdType.Otsu)

        ImageBox3.Image = mOut2

End Sub

运行后如下图所示:

 

图4-3 图像二值化

4.2.2 AdaptiveThreshold

AdaptiveThreshold方法用于对图像进行自适应阈值处理,将图像中的像素值转换为0或255,以便于后续的图像分割、形状检测等处理。该方法只能处理灰度图像,如果要对彩色图像进行自适应阈值处理,需要先将其转换为灰度图像

AdaptiveThreshold方法的声明如下:

Public Shared Sub AdaptiveThreshold(src As Emgu.CV.IInputArray, dst As Emgu.CV.IOutputArray, maxValue As Double, adaptiveType As Emgu.CV.CvEnum.AdaptiveThresholdType, thresholdType As Emgu.CV.CvEnum.ThresholdType, blockSize As Integer, param1 As Double)

主要参数说明:

  1. maxValue:最大值,Double类型,在二值化操作中,将大于阈值的像素值设为该值。
  2. adaptiveMethod:自适应阈值处理的方法,AdaptiveThresholdTyp类型,包括以下常量:
    1. MeanC:阈值为邻域内的均值减去一个常数(param1)。
    2. GaussianC:阈值为邻域内的高斯加权平均值减去一个常数(param1)。
  3. thresholdType:二值化操作的类型,只能是ThresholdType类型的Binary或者BinaryInv。
  4. blockSize:邻域大小,必须为大于3的奇数。
  5. param1:常数,Double类型,表示从均值或高斯加权均值中减去的常数。

【代码位置:frmChapter4】Button3_Click

    'AdaptiveThreshold

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

        Dim m As New Mat("C:\learnEmgucv\lena.jpg", ImreadModes.Color)

        ImageBox1.Image = m

        '彩色转为灰度

        Dim mgray As New Mat

        CvInvoke.CvtColor(m, mgray, ColorConversion.Bgr2Gray)

        Dim mOut1 As New Mat

        '使用高斯加权平均值进行二值化

        CvInvoke.AdaptiveThreshold(mgray, mOut1, 255, AdaptiveThresholdType.GaussianC, ThresholdType.Binary, 3, 0)

        ImageBox2.Image = mOut1

        Dim mOut2 As New Mat

        '使用均值进行二值化

        CvInvoke.AdaptiveThreshold(mgray, mOut2, 255, AdaptiveThresholdType.MeanC, ThresholdType.Binary, 3, 0)

        ImageBox3.Image = mOut2

End Sub

运行后如下图所示:

图4-4 使用AdaptiveThreshold进行图像二值化

4.2.3 图像通道分离和合并

图像通道的分离和合并分别使用到了CvInvoke的Split和Merge方法。Merge方法在2.3.11节【图像通道的分离与合并】有介绍,而CvInvoke.Split方法和该节的Mat.Split方法有所区别,详细请看代码说明。

【代码位置:frmChapter4】Button4_Click

    '通道分离和合并

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

        Dim m As New Mat("C:\learnEmgucv\lena.jpg", ImreadModes.Color)

        ImageBox1.Image = m

        '图像通道分离到 VectorOfMat

        Dim vom As New VectorOfMat()

        CvInvoke.Split(m, vom)

        Dim mOut1 As New Mat

        '输出分离后的第一个通道

        mOut1 = vom(0)

        ImageBox2.Image = mOut1

        '注意和CvInvoke.Split的对比

        Dim channels() As Mat = m.Split()

        '对三个通道分别进行二值化

        CvInvoke.Threshold(channels(0), channels(0), 100, 255, CvEnum.ThresholdType.Binary)

        CvInvoke.Threshold(channels(1), channels(0), 100, 255, CvEnum.ThresholdType.Binary)

        CvInvoke.Threshold(channels(2), channels(0), 100, 255, CvEnum.ThresholdType.Binary)

        '将处理后的三个通道推入 VectorOfMat

        Dim newm As New VectorOfMat

        newm.Push(channels(0))

        newm.Push(channels(1))

        newm.Push(channels(2))

        Dim mdst As New Mat

        '合并通道

        CvInvoke.Merge(newm, mdst)

        ImageBox3.Image = mdst

End Sub

运行后如下图所示:

图4-5 图像通道的分离和合并

4.2.4 按颜色分离

CvInvoke.InRange方法用于在图像中找到指定范围内的像素,并将其设置为白色,其余的像素设置为黑色。在使用CvInvoke.InRange方法时,需要根据实际情况选择合适的下限和上限,以达到最佳的处理效果。同时,CvInvoke.InRange方法只能处理单通道和三通道的图像。如果图像通道数不为1或3,需要先将其转换为单通道或三通道图像

InRange方法的声明如下:

Public Shared Sub InRange(src As Emgu.CV.IInputArray, lower As Emgu.CV.IInputArray, upper As Emgu.CV.IInputArray, dst As Emgu.CV.IOutputArray)

主要参数说明:

lowerb参数是指定范围的下限。

upperb参数是指定范围的上限。

【代码位置:frmChapter4】Button5_Click

    '颜色分离

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

        Dim m As New Mat("C:\learnEmgucv\wslt.jpg", ImreadModes.Color)

        ImageBox1.Image = m

        Dim hsv As New Mat

        '转为Hsv,更容易分离颜色

        CvInvoke.CvtColor(m, hsv, ColorConversion.Bgr2Hsv)

        '设置颜色范围下限和上限,需要根据实际慢慢修改

        Dim lowerb1 As New ScalarArray(New MCvScalar(0, 10, 180))

        Dim upperb1 As New ScalarArray(New MCvScalar(50, 160, 255))

        Dim dst As New Mat

        '使用InRange分离颜色,返回二值图

        CvInvoke.InRange(hsv, lowerb1, upperb1, dst)

        ImageBox2.Image = dst

        Dim dstchannel3 As New Mat()

        '转为3通道图像

        CvInvoke.CvtColor(dst, dstchannel3, ColorConversion.Gray2Bgr)

        Dim result As New Mat()

        'And运算,然后显示分离结果

        CvInvoke.BitwiseAnd(m, dstchannel3, result)

        ImageBox3.Image = result

End Sub

运行后如下图所示:

图4-6 InRange方法分离出人脸


http://www.ppmy.cn/embedded/97334.html

相关文章

OpenCV图像滤波(17)计算图像梯度函数Sobel()的使用

操作系统:ubuntu22.04 OpenCV版本:OpenCV4.9 IDE:Visual Studio Code 编程语言:C11 算法描述 Sobel()函数用于计算图像的一阶、二阶、三阶或混合导数。它使用扩展的Sobel算子来执行这一任务。 在所有情况下,除了一种情况之外&am…

和小米比起来希喂宠物空气净化器怎么样?

有宠物用哪个牌子空气净化机比较好呢?有宠物的家庭除异味、除毛、除菌需求比不养宠的更大,所以有宠物的家庭选空气净化器时一定要着重看这几点。 最近,我发现身边的朋友们都开始重视起家居空气质量,特别是有了宠物之后&#xff0…

AvaloniaChat—从源码构建指南

AvaloniaChat介绍 一个使用大型语言模型进行翻译的简单应用。 我自己的主要使用场景 在看英文文献的过程中,比较喜欢对照着翻译看,因此希望一边是英文一边是中文,虽然某些软件已经自带了翻译功能,但还是喜欢大语言模型的翻译&…

简易版PHP软文发稿开源系统

软文发稿系统源码(软文发布系统)基于旧版本的媒介软文项目基础上整理出一套简易版,以满足不同客户群体。虽然是简易版 但麻雀虽小五脏俱全,基本能满足小众群体需求 具体功能如下: 大模块功能: 1、媒体发布 …

【Java-==与equals】

与equals区别: 1.是关系运算符,equals()是0bject类中定义的方法 2.基本数据类型: 使用比较值,无法使用equals() 3.引用数据类型: 使用比较内存地址; 如果没有重写equals(),仍然调用的是0bject父类的equals(()方法,则比较的是内…

java python-格式化打印目录

java python-格式化打印目录 java代码python代码 java代码 public static void main(String[] args) throws IOException {File directory new File("D:\\CDesktop\\dm\\pac"); // 当前目录printDirectoryTree(directory, 0); // 从第0层开始打印}public static voi…

Java | Leetcode Java题解之第345题反转字符串中的元音字母

题目&#xff1a; 题解&#xff1a; class Solution {public String reverseVowels(String s) {int n s.length();char[] arr s.toCharArray();int i 0, j n - 1;while (i < j) {while (i < n && !isVowel(arr[i])) {i;}while (j > 0 && !isVowe…

加载的案例

<!DOCTYPE html> <html lang"en"> <head> <meta charset"UTF-8" /> <meta name"viewport" content"widthdevice-width, initial-scale1.0" /> <title>下滑加载历史</title> …