load xpmndrll
image(X2)
title('原始彩色索引圖像')
colormap(map);
colorbar
%================================
%分解彩色索引圖像為RGB分量
R=map(X2,1);
R=reshape(R,size(X2));
G=map(X2,2);
G=reshape(G,size(X2));
B=map(X2,3);
B=reshape(G,size(X2));
%================================
n=64;
X=round(Xrgb*(n-1))+1;
map2=gray(n);
figure(2);
image(X);
title('處理后的灰度級索引圖像');
colormap(map2);
colorbar
%================================
baboon=X;
map=map2;
save baboon baboon map