function?[F]=bands_IHS（RGBIPabcd）
RGBI=double（RGBI）;
P=double（P）;
I=（a*RGBI（::1）+b*RGBI（::2）+c*RGBI（::3）+d*RGBI（::4））;

%hist?matching
%P=P*std（std（I））/std（std（P））;
%P=P-（mean（mean（P））-mean（mean（I）））;
P=（P-mean（P（:）））*std（I（:））/std（P（:））?+?mean（I（:））;

for?n=1:4
????F（::n）=RGBI（::n）+P-I;
end
%m=?min（min（min（F）））;
%if?m<0
%????F=F-m;
%end????
%F=F/max（max（max（F）））;

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件????????402??2009-03-03?18:07??IHS\bands_IHS.m

?????文件????????209??2008-10-29?13:58??IHS\expEdge.m

?????文件????????404??2009-03-03?18:08??IHS\FIHS.m

?????文件????????506??2008-07-02?09:52??IHS\findalph.m

?????文件????????431??2008-11-05?14:35??IHS\IKONOS_IHS.m

?????文件????????742??2009-04-17?12:33??IHS\modIHS.m

?????目錄??????????0??2017-12-17?16:34??IHS

-----------?---------??----------?-----??----

?????????????????2694????????????????????7