Matlab实现鼠标点击获取该点RGB值

%%鼠标点击获取rgb
%clear all;

img= imread('IMG_2094.jpg');
imshow(img);
train_rgb= zeros(300,4);
for i =1:300
    set(gcf,'outerposition',get(0,'screensize')); %使该图最大化便于取点
    [y,x] = ginput(1);  %鼠标取一个点
    disp(x);
    disp(y)
    %rectangle('Position',[x-2 y-2 5 5],'LineWidth',0.02,'EdgeColor','r')
    %img=imcrop(hahaha,[x-2,y-2,4,4]); %前两个为起始点，后两个为正方形宽度-1
    %imwrite(img,strcat('black_pic/m',int2str(i),'.jpg'));
    r = img(:,:,1);
    g = img(:,:,2);
    b = img(:,:,3);
    
    x = round(x);
    y = round(y);
    
    rgb = [1, r(x,y), g(x,y), b(x,y)];  %0表示叶片，1表示病斑
    train_rgb(i,:) = rgb;
    
end
xlswrite('train_rgb_1_2094.xls', train_rgb)