[Image enhancement] Gray-scale image enhancement based on matlab area similarity transformation function and dragonfly algorithm [including Matlab source code 089]

1. Introduction

Image enhancement is a necessary and indispensable technology to increase the quality of digital images. The main task is to generate the intensity value of each pixel in a new image using a conversion function to receive the intensity value of each pixel in the input image. The proposed transfer function study is called the Regional Similarity Transfer Function (RSTF), which considers that the density distribution is similar between adjacent pixels. Dragonfly Algorithm (DA) is an intuitive optimization technique, which is the preferred engineering application, and has been used to optimize the parameter values of the proposed transfer function.

Second, the source code

 
% Using the Regional Similarity Transformation Function and Dragonfly Algorithm. 
 
%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%THIS IS A DEMO FOR NOVEL IMAGE ENHANCEMENT USING GRAV脻TAT脻ONAL SEARCH ALGORITHM 
clc;
clear all;
close all;
 
%READ IMAGE
i=imread('test5.bmp');
i=imresize(i,1);  
 
%--------------------------------------------------------------------------
%GLOBAL MEAN
frekans=zeros(256,1);
 
% It records by counting how many times each pixel value is.
 
for k=1:size(i,1)
    for l=1:size(i,2)
 
        value=i(k,l);
       frekans(value+1)=frekans(value+1)+1; 
 
    end
end
deger=max(frekans);
for k=1:256
    if deger==frekans(k)
        D=k;
    end
end
D=double(D/255);
image = im2double(i);
global_mean = D;
%--------------------------------------------------------------------------
% LOCAL MEAN
Bmean = mean_n(image);
%--------------------------------------------------------------------------
%SIMILARITY
[S]=similarity(i);
B=double(S);
%--------------------------
C = std_n(image,Bmean);
im_size = size(image);
%-------------------------------------------------------------------------
%OPTIMIZATION PARAMETERS
N=15; % Agent number;
Max_iteration=15;
%-------------------------------------------------------------------------
%CALL FUNCTION 
 
[parameters Fbest BestChart MeanChart] = GSA_enhancement2(image,global_mean,B,C,im_size, N, Max_iteration);
 
enh = trans(i,image, B, C, global_mean, parameters(1),parameters(2),parameters(3),parameters(4) );
 
figure;
subplot(121)
imshow(image);
title('原图')
subplot(122)
imshow(enh);
   title('GSA增强后的灰度图')

Insert picture description here

Four, remarks