вопрос в том что, как вынести функцию "plot" где строится центр , чтобы строился для видео или как объеденить, чтобы обрабатывалось видео
Код: Выделить всё
clc;
close all;
clear all;
videoFReader = vision.VideoFileReader('No.avi');
depVideoPlayer = vision.DeployableVideoPlayer(15);
writer = vision.VideoFileWriter('Result2.avi');
k = 0;
while ~isDone(videoFReader)
frame1 = step(videoFReader);
step(depVideoPlayer, frame1);
k = k+1;
if (k >= 1) && (k < 500);
Ib=rgb2gray(frame1);
G=fspecial('average', 11)
filt = imfilter(Ib,G,'symmetric');
F1=im2double(filt);
I=Ib-filt;
k=0.95;
p=k*max(max(I));
[x, y]=size(I);% определение размера результирующего изображения свертки
num=numel(I);%Возвращает количество элементов num в массиве I
for n=1:num
if I(n)>p F(n)=255;
else F(n)=0;
end
end
F;
bw=reshape(F,[x,y]);% Возвращает матрицу x на y
F2=uint8(bw);
% выводит на экран бинарный сигнал объекта
S=bwarea(bw(:,:,1))
s = regionprops(F2,'centroid');
centroids = cat(1,s.Centroid);
hold on
F4= (plot(centroids(:,1),centroids(:,2),'b*'));
hold off
frame2 = S-1;
step(writer, frame2);
else end;
end;
release(videoFReader);
release(depVideoPlayer);
release(writer);в конечном итоге должно получится видео, точечного объекта с определением площади и координат, слежением за объектом
