%% 学习目标： 图像类型的转换
%% 将索引图像转换为RGB图像
clear all;
close all;
[X,map]=imread('trees.tif','tif'); %读取索引图像，X是数据，map是调色板
RGB=ind2rgb(X,map); %将索引图像转换为RGB图像
figure;
imshow(RGB); %显示RGB图像
set(gcf,'position',[500,500,600,600]);
%% 将RGB图像转换为索引图像
clear all;
close all;
RGB=imread('peppers.png'); %读取RGB图像
[X,map]=rgb2ind(RGB,12); %将RGB图像转换为索引图像 调色板大小是12行 该值越大越清晰
figure;
imshow(X,map);
set(gcf,'position',[400,400,600,600]);
%% 将RGB图像转换为灰度图像
clear all;
close all;
RGB=imread('peppers.png','png');
I=rgb2gray(RGB);
figure;
imshow(I);
set(gcf,'position',[300,300,500,500]);
%%
clear all;
close all;
[X,map]=imread('trees.tif','tif');
newmap=rgb2gray(map); %只将调色板转换为灰度
figure;
imshow(X,newmap); %新的调色板，数据不变
set(gcf,'position',[400,400,600,600]);
%%
clear all;
close all;
X=imread('rice.png'); %读取一个灰度图像
Y=grayslice(X,12); %将灰度图像转换为索引图像
figure;
imshow(Y,jet(12)); %通过调色板jet给图像上颜色
set(gcf,'position',[400,400,600,600]);
%% 将索引图像转换为灰度图像
clear all;
close all;
[X,map]=imread('trees.tif','tif');
I=ind2gray(X,map);
figure;
imshow(I);
set(gcf,'position',[400,400,600,600]);
%% 将RGB图像转换为二值图像
clear all;
close all;
RGB=imread('peppers.png');
bw=im2bw(RGB,0.4); % 归一化阈值是0.4 二值图像只有黑色和白色
figure;
imshow(bw);
set(gcf,'position',[400,400,500,600]);
%%
clear all;
close all;
A=rand(400,400); %建立一个数据矩阵
I=mat2gray(A); %将数据矩阵转换为灰度图像
figure;
imshow(I);
set(gcf,'position',[200,200,400,300]);
%% 大仙QQ：1960009019
%% 在线教育微信公众号：大仙一品堂
%% 大鱼号：在线教育大仙一品堂
%% 一点资讯号：大仙一品堂
%% 2018/3/19 录制，欢迎指正
