Изчислете квартала вътре или извън даден регион

% Първо, създайте изображенията

FirstImage = [
108 113 121 129 128 124 117 101
114 76  60  110 98  74  121 109
114 62  52  105 85  59  121 116
110 59  54  104 0   0   0   115
104 55  54  104 0   0   0   113
96  48  51  105 0   0   0   113
94  60  69  115 0   0   0   110
99  108 122 130 135 0   0   109
];

SecondImage = [
0   0   0   0   0   0
138 137 137 137 0   0
138 127 129 135 138 0
132 97  99  133 135 0
134 108 110 137 137 0
141 140 140 140 139 0
138 138 138 140 0   0
0   0   0   0   0   0
];

% Направете изображението двоично и го обърнете, така че нулите в изображението да са 1.
% Това е, за да стане съвместимо с bwtraceboundary

im = FirstImage == 0 ;

% Намерете координатите на обекта, за да отговарят на изискванията на bwtraceboundary

objectCoord = find(im); 
[startRow,startCol]  = ind2sub(size(im),objectCoord(1) );  

% Функцията find() сканира матрицата колона по колона
%, за да знаем, че тя ще започне в горния ляв ъгъл и ще работи
% надолу, колона по колона. Следователно част от границата трябва
% да лежи на изток от първата намерена координата. Това е един от начините за намиране на
% началните координати

contour = bwtraceboundary(im,[startRow startCol],'E' ); 

% Маркирайте контура

contourimage = zeros(size(im));
contourind = sub2ind(size(contourimage),contour(:,1),contour(:,2))
contourimage(contourind) = 1;



contourimage =

  0     0     0     0     0     0     0     0
  0     0     0     0     0     0     0     0
  0     0     0     0     0     0     0     0
  0     0     0     0     1     1     1     0
  0     0     0     0     1     0     1     0
  0     0     0     0     1     0     1     0
  0     0     0     0     1     0     1     0
  0     0     0     0     0     1     1     0

% Сега това ще открие само границата на самия обект.
% Търсим най-близките ненулеви стойности до границата.
% За да получите най-близките ненулеви стойности,
% приложете разреждане към брояча изображение и
% след това го умножете по елементи с оригиналното изображение.
% Изчислете средната стойност на ненулевите стойности

% Извършете разреждане

mask = bwmorph(contourimage,'dilate')

mask =

 0     0     0     0     0     0     0     0
 0     0     0     0     0     0     0     0
 0     0     0     1     1     1     1     1
 0     0     0     1     1     1     1     1
 0     0     0     1     1     1     1     1
 0     0     0     1     1     1     1     1
 0     0     0     1     1     1     1     1
 0     0     0     1     1     1     1     1

% Умножете mask с оригиналното изображение по елементи.
% След това самият обект ще бъде нулиран и ненулевата граница ще остане.

A=mask.*FirstImage

A =

 0     0     0     0     0     0     0     0
 0     0     0     0     0     0     0     0
 0     0     0   105    85    59   121   116
 0     0     0   104     0     0     0   115
 0     0     0   104     0     0     0   113
 0     0     0   105     0     0     0   113
 0     0     0   115     0     0     0   110
 0     0     0   130   135     0     0   109

% След това изчислете средната стойност

mean(A(A>0))

ans =

108.6875

Друго решение:

използвайте или:

BW = ~(FirstImage>0);

or:

BW = SecondImage>0;

тогава:

[B,L] = bwboundaries(BW,'noholes');
B=cell2mat(B);
m=zeros(size(BW));
m(sub2ind(size(BW),B(:,1),B(:,2)))=1