clc;
clear?all;?
close?all;?
x=imread（‘lab1.bmp‘）;?
y=imread（‘lab2.bmp‘）;?
figureimshow（x）;
figureimshow（y）;
a=rgb2gray（x）;?
b=rgb2gray（y）;?
a=double（a）;?
b=double（b）;?
[aAaHaVaD]=dwt2（a‘bior2.4‘）;?
[bAbHbVbD]=dwt2（b‘bior2.4‘）;?
newA=zeros（size（aA））;?
newH=zeros（size（aH））;?
newV=zeros（size（aV））;?
newD=zeros（size（aD））;?
[mn]=size（aA）;?
for?i=1:m?
????for?j=1:n?
????????newA（ij）=（aA（ij）+bA（ij））/2;?
????end;?
end;?
for?i=1:m?
????for?j=1:n?
????????if?abs（aH（ij））>=abs（bH（ij））;?
????????????newH（ij）=aH（ij）;?
????????else?
????????????newH（ij）=bH（ij）;?
????????end?
????end?
end?
for?i=1:m?
????for?j=1:n?
????????if?abs（aV（ij））>=abs（bV（ij））;?
????????????newV（ij）=aV（ij）;?
????????else?
????????????newV（ij）=bV（ij）;?
????????end?
????end?
end?
for?i=1:m?
????for?j=1:n?
????????if?abs（aD（ij））>=abs（bD（ij））;?
????????????newD（ij）=aD（ij）;?
????????else?
????????????newD（ij）=bD（ij）;?
????????end?
????end?
end?
new=idwt2（newAnewHnewVnewD‘bior2.4‘）;?
new=uint8（new）;?
figure;?
imshow（new）;?
title（‘系數絕對值之取大‘）;

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????目錄???????????0??2018-03-23?22:22??系數絕對值最大圖像融合\
?????文件????????1106??2018-03-23?22:23??系數絕對值最大圖像融合\coefficientmax.m
?????文件??????921654??2015-04-02?19:53??系數絕對值最大圖像融合\lab1.bmp
?????文件??????921654??2015-04-02?19:53??系數絕對值最大圖像融合\lab2.bmp