Labfans是一个针对大学生、工程师和科研工作者的技术社区。 论坛首页 | 联系我们(Contact Us)
MATLAB爱好者论坛-LabFans.com
返回   MATLAB爱好者论坛-LabFans.com > 工程数学软件 > MATLAB论坛
MATLAB论坛 一切MATLAB相关问题在此讨论。
 
 
主题工具 显示模式
旧 2009-05-16, 21:47   #1
tyhj327
初级会员
 
注册日期: 2009-05-10
帖子: 8
声望力: 0
tyhj327 正向着好的方向发展
默认 哪位高手帮忙改下一个程序错误 急用 谢

clear all
close all
aviobj=avifile('object.avi');
info=aviinfo('D:\SampleVideo.avi');
numframe=info.NumFrames;
mov=aviread('D:\SampleVideo.avi');
frame1=frame2im(mov(1,1));
frame1=rgb2gray(frame1);
% imshow(frame1);
[m,n]=size(frame1);

for i=1:numframe-1
%提取第i帧和第i+1帧,并将之转化为两幅图像
f1=aviread('D:\SampleVideo.avi',i);
f2=aviread('D:\SampleVideo.avi',i+1);
f1=frame2im(f1);
I1=rgb2gray(f1);
f2=frame2im(f2);
I2=rgb2gray(f2);
%求差分图像并二值化
Im=abs(imsubtract(I2,I1));
if Im>150
Imby=1;
else
Imby=0;
end
I=Imby;

%求二值后目标图像的质点
M00=0;
M10=0;
M01=0;
M20=0;
M02=0;
M11=0;
for j=1:m;
for k=1:n;
M00=M00+I(j,k);
M10=M10+j*I(j,k);
M01=M01+k*I(j,k);
M20=M20+(j^2)*I(j,k);
M02=M02+(k^2)*I(j,k);
M11=M11+j*k*I(j,k);
end
end
xcenter=M10/M00;
ycenter=M01/M00;
a=M20/M00-xcenter^2;
b=M11/M00-xcenter*ycenter;
c=M02/M00-ycenter^2;
%下段程序实现功能:求目标长轴与短轴的长度以确定目标大小
l=sqrt(1/2*((a+c)+sqrt(b^2+(a-c)^2)));%目标长轴计算
w=sqrt(1/2*((a+c)-sqrt(b^2+(a-c)^2)));%目标短轴计算
xmin=round(xcenter-l/2);
xmax=round(xcenter+l/2);
ymin=round(ycenter-w/2);
ymax=round(ycenter+w/2);
%以目标中心为中心画框形以框住目标
tagx=[xmin,xmax,xmax,xmin];
tagy=[ymin,ymin,ymax,ymax];
fill(x,y,'w');

%将图像转化为帧,并加入到新avi文件中
I1=gray2rgb(I1);
I1=im2frame(I1);
aviobj=addframe(aviobj,I1);
end
mov=aviread('aviobject.avi');
movie(mov);

执行后,出现“index exceeds matrix dimensions"! 在此多谢了!急!能给出详细的程序改正语句,更好!
tyhj327 当前离线   回复时引用此帖
 

主题工具
显示模式

发帖规则
不可以发表新主题
不可以发表回复
不可以上传附件
不可以编辑自己的帖子

启用 BB 代码
论坛启用 表情符号
论坛启用 [IMG] 代码
论坛禁用 HTML 代码



所有时间均为北京时间。现在的时间是 12:15


Powered by vBulletin
版权所有 ©2000 - 2025,Jelsoft Enterprises Ltd.