MATLAB: Counting the number of muscle fibres in an image
image processingImage Processing Toolbox
Related Solutions
Mohsina, try this:
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 short g;format compact;fontSize = 25;%===============================================================================
% Get the name of the image the user wants to use.
baseFileName = 'image1.png';% Get the full filename, with path prepended.
folder = []; % Determine where demo folder is (works with all versions).
fullFileName = fullfile(folder, baseFileName);%===============================================================================% Read in a demo image.
grayImage = imread(fullFileName);% 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.
subplot(2, 2, 1);imshow(grayImage, []);axis on;axis image;caption = sprintf('Original Gray Scale Image');title(caption, 'FontSize', fontSize, 'Interpreter', 'None');drawnow;hp = impixelinfo();% Set up figure properties:
% Enlarge figure to full screen.
set(gcf, 'Units', 'Normalized', 'OuterPosition', [0, 0, 1, 1]);% Get rid of tool bar and pulldown menus that are along top of figure.
% set(gcf, 'Toolbar', 'none', 'Menu', 'none');
% Give a name to the title bar.
set(gcf, 'Name', 'Demo by ImageAnalyst', 'NumberTitle', 'Off')drawnow;% Create binary image of the black blobs from grayscale image.
binaryImage = grayImage == 0;% Get rid of the background.
binaryImage = imclearborder(binaryImage);% Display the image.subplot(2, 2, 2);imshow(binaryImage, []);axis on;axis image;title('Binary Image', 'FontSize', fontSize, 'Interpreter', 'None');% Label the blobs
[labeledImage, numBlobs] = bwlabel(binaryImage);% Display the image.subplot(2, 2, 2);imshow(binaryImage, []);axis on;axis image;title('Binary Image', 'FontSize', fontSize, 'Interpreter', 'None');% Let's assign each blob a different color to visually show the user the distinct blobs.
coloredLabels = label2rgb (labeledImage, 'hsv', 'k', 'shuffle'); % pseudo random color labels
% coloredLabels is an RGB image. We could have applied a colormap instead (but only with R2014b and later)
subplot(2, 2, 3);imshow(coloredLabels);axis on;axis image; % Make sure image is not artificially stretched because of screen's aspect ratio.
caption = sprintf('Pseudo colored labels, from label2rgb().');title(caption, 'FontSize', fontSize);drawnow;% Make measurements of bounding box.
props = regionprops(labeledImage, 'BoundingBox');% Display the image.subplot(2, 2, 4);imshow(binaryImage, []);axis on;axis image;title('Binary Image with Boxes', 'FontSize', fontSize, 'Interpreter', 'None');% Display the bounding boxes around them.
hold on;for k = 1 : numBlobs thisBoundingBox = props(k).BoundingBox rectangle('Position', thisBoundingBox, ... 'EdgeColor', 'c', 'LineWidth', 2);end
Use subplot(), mean2(), and xlabel():
fontSize = 20;% Make 3 images.
grayImage1 = imread('cameraman.tif');grayImage2 = imread('moon.tif');grayImage3 = imread('pout.tif');% Display image 1 and mean of that image.
subplot(1, 3, 1);imshow(grayImage1, []);title('cameraman.tif', 'FontSize', fontSize, 'Interpreter', 'None');mean1 = mean2(grayImage1);caption = sprintf('Mean = %.2f', mean1);xlabel(caption, 'FontSize', fontSize);% Set up figure properties:
% Enlarge figure to full screen.
set(gcf, 'Units', 'Normalized', 'OuterPosition', [0 0 1 1]);% Get rid of tool bar and pulldown menus that are along top of figure.
set(gcf, 'Toolbar', 'none', 'Menu', 'none');% Give a name to the title bar.
set(gcf, 'Name', 'Demo by ImageAnalyst', 'NumberTitle', 'Off') % Display image 2 and mean of that image.
subplot(1, 3, 2);imshow(grayImage2, []);title('moon.tif', 'FontSize', fontSize, 'Interpreter', 'None');theMean = mean2(grayImage2);caption = sprintf('Mean = %.2f', theMean);xlabel(caption, 'FontSize', fontSize);% Display image 3 and mean of that image.
subplot(1, 3, 3);imshow(grayImage3, []);title('pout.tif', 'FontSize', fontSize, 'Interpreter', 'None');mean3 = mean2(grayImage3);caption = sprintf('Mean = %.2f', mean3);xlabel(caption, 'FontSize', fontSize);
Best Answer