clc; clear all; close all; function out_put = btc_image(in_put,block_size) X=imread(‘rice.png’); Y=imfinfo(‘rice.png’); K=input(‘Enter the block size’); X1=double(X); y1=size(X); n=y1(1); m=y1(2); k=1;l=1; if (Y.ColorType==’grayscale’) % IMAGE ENCODING… Read More »Lossy Image Compression
% **** HISTOGRAM STRETCHING **** a=imread(‘old imagelc.jpg’); aa=double(a); [row col]=size(aa); h=zeros(1,300); rmax=(max(max(aa))); rmin=(min(min(aa))); slope=255/(rmax-rmin); smin=0; aa=aa+1; for x=1:row for y=1:col c(x,y)=slope*(aa(x,y)-rmin)+smin; end… Read More »HISTOGRAM STRETCHING
% **** HOMOMORPHIC FILTERING **** a=imread(‘Ranch house.jpg’); r1=double(a); [row col]=size(r1); b=r1; D0=input(‘enter cut off : ‘); Yh=input(‘enter the value of Yh :’); Yl=input(‘enter the value… Read More »HOMOMORPHIC FILTERING
clc;clear all;close all; load sumsin; s = sumsin; figure (‘Name’,’Input 1-D Signusoidal Signal’); plot(s); figure (‘Name’,’Decomposition’); [c,l] = wavedec(s,4,’bior1.1′); subplot(2,2,1); plot(c); title(‘Function at resolution level… Read More »Wavelet Analysis
% region filling clc; close all; clear all; % Input A=[0 0 0 0 0 0 0 0 0 1 1 0 0 0… Read More »Region Filling Morphological Operation
% **** BIT PLANE SLICING **** a=imread(‘Moon.tif’); b=double(a); [row col]=size(b); %r=input(‘enter bitval : ‘); for x=1:row for y=1:col c=dec2bin(b(x,y),8); d=c(1); w1(x,y)=double(d);… Read More »BIT PLANE SLICING
This program displays following details for a given image 1. Jet Colormap Image 2. Background Estimation 3. Flattened Background Removal 4. Image Thresholding 5. Connected… Read More »Plot the Image details using histogram
% morphdemo.m % demonstration of morphological operators clc; clear all; close all; load p64int.txt; % 64 x 64 gray scale image V=[80:168]; x=ones(size(p64int))-ismember(p64int,V); figure(1),clf, subplot(231),imagesc(x),colormap(‘gray’)… Read More »Morphological Operation 1) Opening 2)Closing 3) Erosion 4) Dilation 5) Boundary Extraction
1. IDEAL LPF: clc; close all; clear all; a=imread(‘circuit.tif’); % reading an image X a=double(a); c=size(a); N=c(1); D0=input(‘Enter the cut-off frequency: ‘); for u=1:1:c(1)… Read More »Image Enhancement Frequency Domain (i) Ideal Low Pass Filter (ii) Butterworth Low Pass Filter (iii) Gaussian Low Pass Filter (iv) Ideal High Pass Filter (v) Butterworth High Pass Filter (vi) Gaussian High Pass Filter
1. IDEAL LPF: clc; close all; clear all; a=imread(‘circuit.tif’); % reading an image X a=double(a); c=size(a); N=c(1); D0=input(‘Enter the cut-off… Read More »Image Enhancement in Frequency Domain (i) Gaussian Low Pass Filter (ii) Butterworth Low Pass Filter (iii) Ideal High Pass Filter (iv) Ideal Low Pass Filter