%% MSR % I=imread('C:\Users\sensen\Desktop\雾霾天气素材\1.jpg'); wu1 = rgb2gray(I); fr=I(:,:,1); fg=I(:,:,2); fb=I(:,:,3); mr=im2double(fr); mg=im2double(fg); mb=im2double(fb); n=141;%定义模板大小。 kid=141; n1=floor((n+1)/2);%确定中心 a1=60; %定义标准差(尺度) kid=60; for i=1:n for j=1:n b(i,j) =exp(-((i-n1)^2+(j-n1)^2)/(a1*a1))/(pi*a1*a1); %高斯函数。 end end nr1=imfilter(mr,b,'conv','replicate'); ng1=imfilter(mg,b,'conv','replicate'); nb1=imfilter(mb,b,'conv','replicate');%卷积滤波。 ur1=log(nr1); ug1=log(ng1); ub1=log(nb1); tr1=log(mr+eps);tg1=log(mg+eps);tb1=log(mb+eps); yr1=(tr1-ur1)/3;yg1=(tg1-ug1)/3;yb1=(tb1-ub1)/3; a2=10; %定义标准差(尺度) for i=1:n for j=1:n a(i,j) =exp(-((i-n1)^2+(j-n1)^2)/(a2*a2))/(pi*a2*a2); %高斯函数。 end end nr2=imfilter(mr,a,'conv','replicate'); ng2=imfilter(mg,a,'conv','replicate'); nb2=imfilter(mb,a,'conv','replicate');%卷积滤波。 ur2=log(nr2);ug2=log(ng2);ub2=log(nb2); tr2=log(mr+eps);tg2=log(mg+eps);tb2=log(mb+eps); yr2=(tr2-ur2)/3;yg2=(tg2-ug2)/3;yb2=(tb2-ub2)/3; a3=150; %定义标准差(尺度)kid=150; for i=1:n for j=1:n e(i,j) =exp(-((i-n1)^2+(j-n1)^2)/(a3*a3))/(pi*a3*a3); %高斯函数。 end end nr3=imfilter(mr,e,'conv','replicate'); ng3=imfilter(mg,e,'conv','replicate'); nb3=imfilter(mb,e,'conv','replicate');%卷积滤波。 ur3=log(nr3);ug3=log(ng3);ub3=log(nb3); tr3=log(mr+eps);tg3=log(mg+eps);tb3=log(mb+eps); yr3=(tr3-ur3)/3;yg3=(tg3-ug3)/3;yb3=(tb3-ub3)/3; dr=yr1+yr2+yr3;dg=yg1+yg2+yg3;db=yb1+yb2+yb3; cr=im2uint8(dr); cg=im2uint8(dg); cb=im2uint8(db); z=cat(3,cr,cg,cb); wu2 = rgb2gray(z); figure(2) subplot(2,2,1), imshow(I);title('原图'); subplot(2,2,2), imshow(z);title('MSR去雾后'); subplot(2,2,3), imhist(wu1);title('原图-灰度'); subplot(2,2,4), imhist(wu2);title('SSR去雾后-灰度');

时间: 2023-12-09 10:05:38 浏览: 125
ZIP

MSR.zip_msr_retinex_site:www.pudn.com_去雾

这是 MSR 算法的 MATLAB 实现示例,其中包括了读入图片、转化为灰度图像、高斯滤波、取对数、计算透射率等步骤。值得注意的是,这段代码中使用的 MSR 算法与我之前给出的实现稍有不同,具体实现细节可以自行查阅。 需要注意的是,这段代码只是一个示例,与具体的图片和实际情况可能有所不同,需要根据实际情况进行调整和修改。同时,这段代码中使用的是固定的参数,如果需要更好的效果,可以根据具体情况调整参数。 代码中使用的图片路径需要根据实际情况进行修改,否则会出现错误。
阅读全文

相关推荐

%% MSR I=imread('C:\Users\sensen\Desktop\雾霾天气素材\1.jpg'); wu1 = rgb2gray(I); fr=I(:,:,1); fg=I(:,:,2); fb=I(:,:,3); mr=im2double(fr); mg=im2double(fg); mb=im2double(fb); n=141;%定义模板大小。 kid=141; n1=floor((n+1)/2);%确定中心 a1=60; %定义标准差(尺度) kid=60; for i=1:n for j=1:n b(i,j) =exp(-((i-n1)^2+(j-n1)^2)/(a1*a1))/(pi*a1*a1); %高斯函数。 end end nr1=imfilter(mr,b,'conv','replicate'); ng1=imfilter(mg,b,'conv','replicate'); nb1=imfilter(mb,b,'conv','replicate');%卷积滤波。 ur1=log(nr1); ug1=log(ng1); ub1=log(nb1); tr1=log(mr+eps);tg1=log(mg+eps);tb1=log(mb+eps); yr1=(tr1-ur1)/3;yg1=(tg1-ug1)/3;yb1=(tb1-ub1)/3; a2=10; %定义标准差(尺度) for i=1:n for j=1:n a(i,j) =exp(-((i-n1)^2+(j-n1)^2)/(a2*a2))/(pi*a2*a2); %高斯函数。 end end nr2=imfilter(mr,a,'conv','replicate'); ng2=imfilter(mg,a,'conv','replicate'); nb2=imfilter(mb,a,'conv','replicate');%卷积滤波。 ur2=log(nr2);ug2=log(ng2);ub2=log(nb2); tr2=log(mr+eps);tg2=log(mg+eps);tb2=log(mb+eps); yr2=(tr2-ur2)/3;yg2=(tg2-ug2)/3;yb2=(tb2-ub2)/3; a3=150; %定义标准差(尺度)kid=150; for i=1:n for j=1:n e(i,j) =exp(-((i-n1)^2+(j-n1)^2)/(a3*a3))/(pi*a3*a3); %高斯函数。 end end nr3=imfilter(mr,e,'conv','replicate'); ng3=imfilter(mg,e,'conv','replicate'); nb3=imfilter(mb,e,'conv','replicate');%卷积滤波。 ur3=log(nr3);ug3=log(ng3);ub3=log(nb3); tr3=log(mr+eps);tg3=log(mg+eps);tb3=log(mb+eps); yr3=(tr3-ur3)/3;yg3=(tg3-ug3)/3;yb3=(tb3-ub3)/3; dr=yr1+yr2+yr3;dg=yg1+yg2+yg3;db=yb1+yb2+yb3; cr=im2uint8(dr); cg=im2uint8(dg); cb=im2uint8(db); z=cat(3,cr,cg,cb); wu2 = rgb2gray(z); figure(2) subplot(2,2,1), imshow(I);title('原图'); subplot(2,2,2), imshow(z);title('MSR去雾后'); subplot(2,2,3), imhist(wu1);title('原图-灰度'); subplot(2,2,4), imhist(wu2);title('SSR去雾后-灰度');

function [prr,pcr,p]=glws(x,m,t) %函数名为关联维数的首字母,用于单串序列,多串到glsw; %x为要分析的数据; %x=xlsread('d:\matworks\dbin.xls'); [m1,n1]=size(x); n=m1; [mm1,mm]=size(m); p=zeros(mm,2); %存放拟合系数的矩阵; rr=zeros(20,mm);%rr是相当于筛子的那个距离,存放的是对数; cr=zeros(20,mm);%cr是小于筛子距离的距离个数,存放的是对数; %prr=zeros(20,mm);%rr是相当于筛子的那个距离,存放的是对数; %pcr=zeros(20,mm);%cr是小于筛子距离的距离个数,存放的是对数; scope=zeros(19,1); msr=zeros(19,1); for k=1:mm tt=0; nm=n-(m(k)-1)*t;%Nm为列数; nr=(nm-1)*nm/2;%Nr为距离的总个数; juli=zeros(nr,1);%全部距离搞成一列的长矩阵; r=zeros(nm,nm);%各列之间距离矩阵; y=zeros(m(k),nm);%重构相矩阵的值yij; for j=1:nm for i=1:m(k) y(i,j)=x(j+(i-1)t); end end for i=1:nm-1 for j=i+1:nm for kk=1:m(k) r(i,j)=r(i,j)+(y(kk,j)-y(kk,i))^2; end r(i,j)=sqrt(r(i,j)); tt=tt+1; juli(tt)=r(i,j); end end %进行r和cr个数的计算; rmin=min(juli); rmax=max(juli); for i=1:20 %每次把距离间隔分20分来慢慢加; rr(i,k)=(rmax-rmin)(i+1)/21; %距离取法值得研究一下; for j=1:nr if juli(j)<=rr(i,k) cr(i,k)=cr(i,k)+1; end end rr(i,k)=log(rr(i,k)); cr(i,k)=log(cr(i,k)/nr); end %rr=rr'; tt=0; for i=1:19 scope(i)=(cr(i+1,k)-cr(i,k))/(rr(i+1,k)-rr(i,k));%每点的斜率; tt=tt+scope(i); plot(i,scope(i),'-bd'),hold on; end tt=tt/19;%各相邻点间斜率平均值; tshold=(max(scope)-min(scope))/2;%threshold,阈值; for i=1:19 msr(i)=abs(scope(i)-tt); %各斜率与平均值的均方根,mean square root; end tt=0; for i=2:18 if (msr(i-1)>tshold & msr(i+1)>tshold)|(msr(i-1)<0.001 & msr(i+1)<0.001) continue else tt=tt+1; prr(tt)=rr(i,k);%符合条件的; pcr(tt)=cr(i,k); end end p(k,1:2)=polyfit(prr,pcr,1);%线性拟合,p为两个数,p1为斜率,p2为截距; end 解释一下这段代码

最新推荐

recommend-type

H3C MSR 系列路由器 Web配置指导(V5).pdf

《H3C MSR系列路由器Web配置指南(V5)》是一本详细阐述如何通过网页界面进行H3C MSR中低端路由器配置的指导书籍。该指南专为H3C MSR系列路由器的V5版本设计,旨在帮助用户高效、安全地管理网络设备。 在访问控制部分...
recommend-type

H3C-MSR路由器升级指导.docx

"H3C-MSR路由器升级指导" 本指导手册旨在帮助用户升级H3C-MSR系列路由器,包括常规ctl升级、bootroom升级等方式。升级包应提前下载好,本地电脑配置tftp或ftp。 一、启动文件简介 启动文件用于引导设备启动的程序...
recommend-type

H3C配置经典全面教程(经验和资料收集整理版).doc

《H3C配置经典全面教程》是一份详细指导如何配置H3C MSR路由器和交换机的文档,适合网络初学者。教程涵盖了从基础的设备连接到高级的网络配置,包括登录设备、设置本地用户进行telnet登录认证、接口配置、路由设置...
recommend-type

H3C MSR系列路由器负载分担、链路备份的实现过程详解.

"H3C MSR系列路由器负载分担、链路备份的实现过程详解" 本篇文章将详细介绍H3C MSR系列路由器在负载分担和链路备份方面的实现过程。同时,我们也将探讨双出口解决方案的案例。 一、负载分担和链路备份的需求 随着...
recommend-type

常用ARM指令集及汇编.pdf

- **MRS**、**MSR**:从/到状态寄存器的转移。 ### Thumb指令集 Thumb指令集是ARM指令集的一个精简版本,用于节省代码空间。它有类似的寻址方式和指令,但格式和操作略有不同。 1. **Thumb存储器访问**: - **...
recommend-type

Aspose资源包:转PDF无水印学习工具

资源摘要信息:"Aspose.Cells和Aspose.Words是两个非常强大的库,它们属于Aspose.Total产品家族的一部分,主要面向.NET和Java开发者。Aspose.Cells库允许用户轻松地操作Excel电子表格,包括创建、修改、渲染以及转换为不同的文件格式。该库支持从Excel 97-2003的.xls格式到最新***016的.xlsx格式,还可以将Excel文件转换为PDF、HTML、MHTML、TXT、CSV、ODS和多种图像格式。Aspose.Words则是一个用于处理Word文档的类库,能够创建、修改、渲染以及转换Word文档到不同的格式。它支持从较旧的.doc格式到最新.docx格式的转换,还包括将Word文档转换为PDF、HTML、XAML、TIFF等格式。 Aspose.Cells和Aspose.Words都有一个重要的特性,那就是它们提供的输出资源包中没有水印。这意味着,当开发者使用这些资源包进行文档的处理和转换时,最终生成的文档不会有任何水印,这为需要清洁输出文件的用户提供了极大的便利。这一点尤其重要,在处理敏感文档或者需要高质量输出的企业环境中,无水印的输出可以帮助保持品牌形象和文档内容的纯净性。 此外,这些资源包通常会标明仅供学习使用,切勿用作商业用途。这是为了避免违反Aspose的使用协议,因为Aspose的产品虽然是商业性的,但也提供了免费的试用版本,其中可能包含了特定的限制,如在最终输出的文档中添加水印等。因此,开发者在使用这些资源包时应确保遵守相关条款和条件,以免产生法律责任问题。 在实际开发中,开发者可以通过NuGet包管理器安装Aspose.Cells和Aspose.Words,也可以通过Maven在Java项目中进行安装。安装后,开发者可以利用这些库提供的API,根据自己的需求编写代码来实现各种文档处理功能。 对于Aspose.Cells,开发者可以使用它来完成诸如创建电子表格、计算公式、处理图表、设置样式、插入图片、合并单元格以及保护工作表等操作。它也支持读取和写入XML文件,这为处理Excel文件提供了更大的灵活性和兼容性。 而对于Aspose.Words,开发者可以利用它来执行文档格式转换、读写文档元数据、处理文档中的文本、格式化文本样式、操作节、页眉、页脚、页码、表格以及嵌入字体等操作。Aspose.Words还能够灵活地处理文档中的目录和书签,这让它在生成复杂文档结构时显得特别有用。 在使用这些库时,一个常见的场景是在企业应用中,需要将报告或者数据导出为PDF格式,以便于打印或者分发。这时,使用Aspose.Cells和Aspose.Words就可以实现从Excel或Word格式到PDF格式的转换,并且确保输出的文件中不包含水印,这提高了文档的专业性和可信度。 需要注意的是,虽然Aspose的产品提供了很多便利的功能,但它们通常是付费的。用户需要根据自己的需求购买相应的许可证。对于个人用户和开源项目,Aspose有时会提供免费的许可证。而对于商业用途,用户则需要购买商业许可证才能合法使用这些库的所有功能。"
recommend-type

管理建模和仿真的文件

管理Boualem Benatallah引用此版本:布阿利姆·贝纳塔拉。管理建模和仿真。约瑟夫-傅立叶大学-格勒诺布尔第一大学,1996年。法语。NNT:电话:00345357HAL ID:电话:00345357https://theses.hal.science/tel-003453572008年12月9日提交HAL是一个多学科的开放存取档案馆,用于存放和传播科学研究论文,无论它们是否被公开。论文可以来自法国或国外的教学和研究机构,也可以来自公共或私人研究中心。L’archive ouverte pluridisciplinaire
recommend-type

【R语言高性能计算秘诀】:代码优化,提升分析效率的专家级方法

![R语言](https://www.lecepe.fr/upload/fiches-formations/visuel-formation-246.jpg) # 1. R语言简介与计算性能概述 R语言作为一种统计编程语言,因其强大的数据处理能力、丰富的统计分析功能以及灵活的图形表示法而受到广泛欢迎。它的设计初衷是为统计分析提供一套完整的工具集,同时其开源的特性让全球的程序员和数据科学家贡献了大量实用的扩展包。由于R语言的向量化操作以及对数据框(data frames)的高效处理,使其在处理大规模数据集时表现出色。 计算性能方面,R语言在单线程环境中表现良好,但与其他语言相比,它的性能在多
recommend-type

在构建视频会议系统时,如何通过H.323协议实现音视频流的高效传输,并确保通信的稳定性?

要通过H.323协议实现音视频流的高效传输并确保通信稳定,首先需要深入了解H.323协议的系统结构及其组成部分。H.323协议包括音视频编码标准、信令控制协议H.225和会话控制协议H.245,以及数据传输协议RTP等。其中,H.245协议负责控制通道的建立和管理,而RTP用于音视频数据的传输。 参考资源链接:[H.323协议详解:从系统结构到通信流程](https://wenku.csdn.net/doc/2jtq7zt3i3?spm=1055.2569.3001.10343) 在构建视频会议系统时,需要合理配置网守(Gatekeeper)来提供地址解析和准入控制,保证通信安全和地址管理
recommend-type

Go语言控制台输入输出操作教程

资源摘要信息:"在Go语言(又称Golang)中,控制台的输入输出是进行基础交互的重要组成部分。Go语言提供了一组丰富的库函数,特别是`fmt`包,来处理控制台的输入输出操作。`fmt`包中的函数能够实现格式化的输入和输出,使得程序员可以轻松地在控制台显示文本信息或者读取用户的输入。" 1. fmt包的使用 Go语言标准库中的`fmt`包提供了许多打印和解析数据的函数。这些函数可以让我们在控制台上输出信息,或者从控制台读取用户的输入。 - 输出信息到控制台 - Print、Println和Printf是基本的输出函数。Print和Println函数可以输出任意类型的数据,而Printf可以进行格式化输出。 - Sprintf函数可以将格式化的字符串保存到变量中,而不是直接输出。 - Fprint系列函数可以将输出写入到`io.Writer`接口类型的变量中,例如文件。 - 从控制台读取信息 - Scan、Scanln和Scanf函数可以读取用户输入的数据。 - Sscan、Sscanln和Sscanf函数则可以从字符串中读取数据。 - Fscan系列函数与上面相对应,但它们是将输入读取到实现了`io.Reader`接口的变量中。 2. 输入输出的格式化 Go语言的格式化输入输出功能非常强大,它提供了类似于C语言的`printf`和`scanf`的格式化字符串。 - Print函数使用格式化占位符 - `%v`表示使用默认格式输出值。 - `%+v`会包含结构体的字段名。 - `%#v`会输出Go语法表示的值。 - `%T`会输出值的数据类型。 - `%t`用于布尔类型。 - `%d`用于十进制整数。 - `%b`用于二进制整数。 - `%c`用于字符(rune)。 - `%x`用于十六进制整数。 - `%f`用于浮点数。 - `%s`用于字符串。 - `%q`用于带双引号的字符串。 - `%%`用于百分号本身。 3. 示例代码分析 在文件main.go中,可能会包含如下代码段,用于演示如何在Go语言中使用fmt包进行基本的输入输出操作。 ```go package main import "fmt" func main() { var name string fmt.Print("请输入您的名字: ") fmt.Scanln(&name) // 读取一行输入并存储到name变量中 fmt.Printf("你好, %s!\n", name) // 使用格式化字符串输出信息 } ``` 以上代码首先通过`fmt.Print`函数提示用户输入名字,并等待用户从控制台输入信息。然后`fmt.Scanln`函数读取用户输入的一行信息(包括空格),并将其存储在变量`name`中。最后,`fmt.Printf`函数使用格式化字符串输出用户的名字。 4. 代码注释和文档编写 在README.txt文件中,开发者可能会提供关于如何使用main.go代码的说明,这可能包括代码的功能描述、运行方法、依赖关系以及如何处理常见的输入输出场景。这有助于其他开发者理解代码的用途和操作方式。 总之,Go语言为控制台输入输出提供了强大的标准库支持,使得开发者能够方便地处理各种输入输出需求。通过灵活运用fmt包中的各种函数,可以轻松实现程序与用户的交互功能。