clc
clear
close all
% 输入原始图像
image = imread('ant.jpg');
% 构造高斯滤波器
[N1, M1, dim] = size(image);
sigma = 250;
F = fspecial('gaussian', [N1,M1], sigma);
Efft = fft2(double(F));
%%%%%%%%%%%%%%%%%%% 获取R通道值,并进行对数处理 %%%%%%%%%%%%%%%%%%%%%%%
R = image(:, :, 1);
R0 = double(R);
Rlog = log(R0+1);
Rfft2 = fft2(R0);
DR0 = Rfft2.* Efft;
DR = ifft2(DR0);
% 求反射分量,并归一化处理
DRlog = log(DR +1);
Rr = Rlog - DRlog;
EXPRr = exp(Rr);
MIN = min(min(EXPRr));
MAX = max(max(EXPRr));
EXPRr = (EXPRr - MIN)/(MAX - MIN);
% 调用CLAHE对比度增强函数
EXPRr = adapthisteq(EXPRr);
%%%%%%%%%%%%%%%%%%% 获取G通道值,并进行对数处理 %%%%%%%%%%%%%%%%%%%%%%%
G = image(:, :, 2);
G0 = double(G);
Glog = log(G0+1);
Gfft2 = fft2(G0);
DG0 = Gfft2.* Efft;
DG = ifft2(DG0);
% 求反射分量,并归一化处理
DGlog = log(DG +1);
Gg = Glog - DGlog;
EXPGg = exp(Gg);
MIN = min(min(EXPGg));
MAX = max(max(EXPGg));
EXPGg = (EXPGg - MIN)/(MAX - MIN);
% 调用CLAHE对比度增强函数
EXPGg = adapthisteq(EXPGg);
%%%%%%%%%%%%%%%%%%% 获取B通道值,并进行对数处理 %%%%%%%%%%%%%%%%%%%%%%%
B = image(:, :, 3);
B0 = double(B);
Blog = log(B0+1);
Bfft2 = fft2(B0);
DB0 = Bfft2.* Efft;
DB = ifft2(DB0);
% 求反射分量,并归一化处理
DBlog = log(DB+1);
Bb = Blog - DBlog;
EXPBb = exp(Bb);
MIN = min(min(EXPBb));
MAX = max(max(EXPBb));
EXPBb = (EXPBb - MIN)/(MAX - MIN);
% 调用CLAHE对比度增强函数
EXPBb = adapthisteq(EXPBb);
% 合成SSR彩色图像
ssr_rgb = cat(3, EXPRr, EXPGg, EXPBb)*255;
%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 计算增强图像的评价指标 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
improved_gray_image = rgb2gray(uint8(ssr_rgb));
gray_image = rgb2gray(image);
% Mean
[M_out,N_in] = Mean( improved_gray_image,gray_image );
% MSE
k = 3;
mse1 = MSE(gray_image,k);
mse2 = MSE(improved_gray_image,k);
% PSNR
psnr = PSNR(improved_gray_image,gray_image);
% information entropy,IE
ie_src = IE(gray_image,k);
ie = IE(improved_gray_image,k);
% SSIM
ssim = SSIM( improved_gray_image,gray_image );
index = [M_out,N_in,mse1,mse2,psnr,ie_src,ie,ssim];
%******************************* 图像输出显示 ******************************%
figure(1)
imshow(image,[]);title('原始图像');
figure(2)
imshow(uint8(ssr_rgb));title('SSR增强的彩色图像');
% 显示增强后的图像直方图
figure(3)
imhist(improved_gray_image);title('增强图像直方图');
% xlabel('增强图像')
没有合适的资源?快使用搜索试试~ 我知道了~
【图像增强】基于matlab单尺度Retinex图像增强【含Matlab源码 3961期】.zip
共12个文件
m:8个
jpg:4个
1.该资源内容由用户上传,如若侵权请联系客服进行举报
2.虚拟产品一经售出概不退款(资源遇到问题,请及时私信上传者)
2.虚拟产品一经售出概不退款(资源遇到问题,请及时私信上传者)
版权申诉
0 下载量 110 浏览量
2024-02-18
10:20:37
上传
评论
收藏 64KB ZIP 举报
温馨提示
CSDN海神之光上传的代码均可运行,亲测可用,直接替换数据即可,适合小白; 1、代码压缩包内容 主函数:main.m; 调用函数:其他m文件;无需运行 运行结果效果图; 2、代码运行版本 Matlab 2019b;若运行有误,根据提示修改;若不会,私信博主; 3、运行操作步骤 步骤一:将所有文件放到Matlab的当前文件夹中; 步骤二:双击打开main.m文件; 步骤三:点击运行,等程序运行完得到结果; 4、仿真咨询 如需其他服务,可私信博主或扫描博客文章底部QQ名片; 4.1 博客或资源的完整代码提供 4.2 期刊或参考文献复现 4.3 Matlab程序定制 4.4 科研合作 图像去噪:小波阙值、BM3D、BdCNN、DCT、均值、中值、平滑滤波、维纳、PM模型、双边滤波、全变分算法、正则化、即插即用法
资源推荐
资源详情
资源评论
收起资源包目录
【图像增强】基于matlab单尺度Retinex图像增强【含Matlab源码 3961期】.zip (12个子文件)
【图像增强】基于matlab单尺度Retinex图像增强【含Matlab源码 3961期】
MSE.m 218B
运行结果1.jpg 13KB
ant.jpg 15KB
Sub_IE.m 771B
main.m 2KB
运行结果2.jpg 16KB
PSNR.m 554B
IE.m 2KB
Local_mean_variance.m 2KB
SSIM.m 1KB
Mean.m 443B
运行结果3.jpg 24KB
共 12 条
- 1
资源评论
海神之光
- 粉丝: 3w+
- 资源: 2094
上传资源 快速赚钱
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功