[X,cmap] = imread('corn.tif'); imshow(X,cmap); RGB = ind2rgb(X,cmap); szRGB=size(RGB); minRed=0.8; indRed=find(RGB(:,:,1)>minRed); AnteilRed=numel(indRed)/(szRGB(1)*szRGB(2))*100; disp(['Der Anteil der Farbe rot mit Intensität größer ',num2str(minRed),' ist ',num2str(AnteilRed),' .'])