clc;
close all;
clear;
workspace;
format long g;
format compact;
fontSize = 15;
baseFileName = '1.png';
folder = [];
fullFileName = fullfile(folder, baseFileName);
grayImage = imread(fullFileName);
[rows, columns, numberOfColorChannels] = size(grayImage);
if numberOfColorChannels > 1
grayImage = rgb2gray(grayImage);
end
figure;
imshow(grayImage, []);
axis on;
caption = sprintf('Original Gray Scale Image');
title(caption, 'FontSize', fontSize, 'Interpreter', 'None');
drawnow;
hp = impixelinfo();
set(gcf, 'Units', 'Normalized', 'OuterPosition', [0 0 1 1]);
set(gcf, 'Toolbar', 'none', 'Menu', 'none');
set(gcf, 'Name', 'Demo by ImageAnalyst', 'NumberTitle', 'Off')
hold on;
drawnow;
checkerBoardRows = round(linspace(14, 1268, 9));
checkerBoardColumns = round(linspace(11, 1257, 9));
for row = 1 : length(checkerBoardRows)
thisRow = checkerBoardRows(row);
line([thisRow, thisRow], [checkerBoardRows(1), checkerBoardRows(end)],...
'Color', 'r', 'LineWidth', 2);
end
for col = 1 : length(checkerBoardColumns)
thisCol = checkerBoardColumns(col);
line([checkerBoardColumns(1), checkerBoardColumns(end)], [thisCol, thisCol],...
'Color', 'r', 'LineWidth', 2);
end
figure;
plotNumber = 1;
for row = 1 : length(checkerBoardRows)-1
row1 = checkerBoardRows(row);
row2 = checkerBoardRows(row+1) - 1;
for col = 1 : length(checkerBoardColumns)-1
col1 = checkerBoardColumns(col);
col2 = checkerBoardColumns(col+1) - 1;
subplot(8, 8, plotNumber);
subImage = grayImage(row1:row2, col1:col2);
imshow(subImage);
drawnow;
if plotNumber == 1
set(gcf, 'Units', 'Normalized', 'OuterPosition', [0 0 1 1]);
set(gcf, 'Toolbar', 'none', 'Menu', 'none');
set(gcf, 'Name', 'Demo by ImageAnalyst', 'NumberTitle', 'Off')
hold on;
drawnow;
end
plotNumber = plotNumber + 1;
end
end