%壓縮圖像的灰度級
function?changeout=change（Agrade）

[MNO]=size（A）;

%將A轉化為會的圖像

if?O?==?1
????A=A;
else
????A=rgb2gray（A）;
end

changeout=zeros（MN）;

for?i?=?1:M
????for?j?=?1:N
????????for?n?=?1:grade
????????????s=256/grade;
????????????if?（n-1）*s<=A（ij）?&?（n-1）*s+（s-1）?>=A（ij）
????????????????changeout（ij）?=?n-1;
????????????????
????????????end
????????end
????end
end

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

?????文件????????301??2012-03-27?14:24??灰度共生矩陣\change.asv

?????文件????????415??2012-03-27?14:55??灰度共生矩陣\change.m

?????文件???????2116??2012-03-27?14:54??灰度共生矩陣\features.asv

?????文件???????2079??2012-03-27?15:03??灰度共生矩陣\features.m

?????文件????????980??2012-03-27?13:42??灰度共生矩陣\GLCM.m

?????文件????????127??2012-03-27?11:25??灰度共生矩陣\main.asv

?????文件????????392??2012-03-27?15:52??灰度共生矩陣\main.m

?????文件???????3960??2012-03-27?11:15??灰度共生矩陣\Texture.asv

?????文件??????20992??2012-03-27?10:49??灰度共生矩陣\特征代表的含義.doc

?????文件??????64598??2012-03-27?09:28??灰度共生矩陣\特征計算方法.pdf

?????目錄??????????0??2012-03-27?15:49??灰度共生矩陣

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

????????????????95960????????????????????11