I have this image.
I need to get which glass is the fullest, but I am stuck.
Can't think of anything anymore , please help.
digital image processingimage analysisimage processingImage Processing Toolboximage segmentation
clc; % Clear the command window.
close all; % Close all figures (except those of imtool.)
clear; % Erase all existing variables. Or clearvars if you want.
workspace; % Make sure the workspace panel is showing.
format long g;format compact;fontSize = 20;% Check that user has the Image Processing Toolbox installed.
hasIPT = license('test', 'image_toolbox');if ~hasIPT % User does not have the toolbox installed.
message = sprintf('Sorry, but you do not seem to have the Image Processing Toolbox.\nDo you want to try to continue anyway?'); reply = questdlg(message, 'Toolbox missing', 'Yes', 'No', 'Yes'); if strcmpi(reply, 'No') % User said No, so exit.
return; endend% Read in a demo image.
folder = pwd % or wherever the image lives
baseFileName = 'batik22.PNG';%===============================================================================
% Read in a color reference image.
% Get the full filename, with path prepended.
fullFileName = fullfile(folder, baseFileName);if ~exist(fullFileName, 'file') % Didn't find it there. Check the search path for it.
fullFileName = baseFileName; % No path this time.
if ~exist(fullFileName, 'file') % Still didn't find it. Alert user.
errorMessage = sprintf('Error: %s does not exist.', fullFileName); uiwait(warndlg(errorMessage)); return; endendrgbImage = imread(fullFileName);% Get the dimensions of the image. numberOfColorBands should be = 3.
[rows, columns, numberOfColorBands] = size(rgbImage);% Display the original color image.
subplot(2, 2, 1);imshow(rgbImage);title('Original Color Image', 'FontSize', fontSize, 'Interpreter', 'None');% Enlarge figure to full screen.
set(gcf, 'Units', 'Normalized', 'Outerposition', [0, 0, 1, 1]);% Take the red channel
grayImage = rgbImage(:,:, 1);subplot(2, 2, 2);imshow(grayImage);axis on;title('Red Channel Image', 'FontSize', fontSize, 'Interpreter', 'None');% Threshold the image
binaryImage = grayImage < 127;subplot(2, 2, 3);imshow(binaryImage, []);title('Binary Image', 'FontSize', fontSize, 'Interpreter', 'None');% Take the 8 largest blobs, then invert the image
binaryImage = ~bwareafilt(binaryImage, 8);subplot(2, 2, 4);imshow(binaryImage, []);caption = sprintf('Final Binary Image with 8 largest blobs');title(caption, 'FontSize', fontSize, 'Interpreter', 'None');
clc; % Clear the command window.
close all; % Close all figures (except those of imtool.)
clear; % Erase all existing variables. Or clearvars if you want.
workspace; % Make sure the workspace panel is showing.
format long g;format compact;fontSize = 22;%--------------------------------------------------------------------------------------------------------
% READ IN IMAGE
folder = pwd;baseFileName = 'cameraman.tif';grayImage = imread(baseFileName);% Get the dimensions of the image.
% numberOfColorChannels should be = 1 for a gray scale image, and 3 for an RGB color image.
[rows, columns, numberOfColorChannels] = size(grayImage)if numberOfColorChannels > 1 % It's not really gray scale like we expected - it's color.
% Use weighted sum of ALL channels to create a gray scale image.
grayImage = rgb2gray(grayImage); % ALTERNATE METHOD: Convert it to gray scale by taking only the green channel,
% which in a typical snapshot will be the least noisy channel.
% grayImage = grayImage(:, :, 2); % Take green channel.
end%--------------------------------------------------------------------------------------------------------% Display the image with the original, linear colormap.
subplot(2, 2, 1);cmap = jet(256);imshow(grayImage, 'Colormap', cmap);axis('on', 'image');title('Original Color Map', 'FontSize', fontSize, 'Interpreter', 'None');impixelinfo;colorbar;hFig = gcf;hFig.WindowState = 'maximized'; % May not work in earlier versions of MATLAB.
drawnow;set(gca,'ColorScale','log')%--------------------------------------------------------------------------------------------------------% Show the histogram:
subplot(2, 2, 2);imhist(grayImage);grid on;title('Histogram', 'FontSize', fontSize, 'Interpreter', 'None');minGL = 150;maxGL = 190;xline(minGL, 'Color', 'r', 'LineWidth', 2);xline(maxGL, 'Color', 'r', 'LineWidth', 2);%--------------------------------------------------------------------------------------------------------% BINARIZE THE IMAGE
mask = grayImage >= minGL & grayImage <= maxGL;%--------------------------------------------------------------------------------------------------------% Display the mask.
subplot(2, 2, 3);imshow(mask);axis('on', 'image');title('Mask', 'FontSize', fontSize, 'Interpreter', 'None');impixelinfo;colorbar;drawnow;%--------------------------------------------------------------------------------------------------------% Apply the mask
maskedImage = grayImage; % Initialize
maskedImage(~mask) = 0; % Erase outside of mask
subplot(2, 2, 4);imshow(maskedImage, 'Colormap', cmap);axis('on', 'image');caption = sprintf('Masked Image with color map applied between %d and %d', minGL, maxGL);title(caption, 'FontSize', fontSize, 'Interpreter', 'None');impixelinfo;colorbar;caxis([minGL, maxGL]);drawnow;
Best Answer