function?[Data1]?=?HistogramMatching（data1data2）
????%?進行直方圖匹配，第一個參數是待處理影像，第二個參數是參考圖像
????data1_tbl?=?tbl（data1）;?%?做表格計算
????data2_tbl?=?tbl（data2）;?
????
????X1?=?data1_tbl（4:）;?%?獲取累計直方圖
????X2?=?data2_tbl（4:）;?
???????
????%?確定灰度值替代關系
????M?=?zeros（length（X1）length（X2））;
????for?i?=?1?:length（X2）
????????for?j?=?1:length（X1）
????????????M（ij）?=?abs（X1（j）-X2（i））;
????????end
????end
????[~min_location]?=?min（M）;??%?min_location使一個行向量，記錄了每一列最小值的位置與下標的關系，
????%?求原圖像通過位置信息映射到的新像素的值
????Data1?=?[];
????A?=?size（data1）;
????for?i?=?1:?A（1）
????????for?j?=?1:A（2）
????????????Data1（ij）?=?min_location（data1（ij）+1）-1;??%?+1是位置，-1是像元
????????end
????end
end

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

?????文件????????797??2019-10-30?09:50??HistogramMatching.m

?????文件????????608??2019-12-12?21:30??PCA_Fusion.m

?????文件????????520??2019-12-13?08:46??PCA.m

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

?????????????????1925????????????????????3