isobjim.m

模式识别工具箱,本人毕业论文时用到的,希望对大家有用!

%ISOBJIM
%
% True if dataset contains object that are images

function n = isobjim(a)
n = 0;
if isa(a,'dataset')
	[m,k] = size(a);
	imheight = dataimage(a);
	if imheight > 0 & imheight*round(k/imheight) == k
		n = 1;
	end
end