matlab小波变换图像边缘检测源代码

clear all; 
load wbarb; %小波变换边缘提取程序
I = ind2gray（Xmap）;%检索图转成灰度图
imshow（I）; 
I1 = imadjust（Istretchlim（I）[01]）;%调整图像的像素值，可以改变对比度和颜色
figure;
imshow（I1）; 
[NM] = size（I）; 
h = [0.1250.3750.3750.125]; 
g = [0.5-0.5]; 
delta = [100]; 
J = 3; 
a（1:N1:M11:J+1） = 0; 
dx（1:N1:M11:J+1） = 0; 
dy（1:N1:M11:J+1） = 0; 
d（1:N1:M11:J+1） = 0; 
a（::11） = conv2（hhI‘same‘）; %二维卷积
dx（::11） = conv2（deltagI‘same‘）; 
dy（::11） = conv2（gdeltaI‘same‘）; 
x = dx（::11）; 
y = dy（::11）; 
d（::11） = sqrt（x.^2+y.^2）; 
I1 = imadjust（d（::11）