find_target.m

数据挖掘的工具箱,最新版的,希望对做这方面研究的人有用

%FIND_TARGET extract the indices of the target and outlier objects
%
%   [It,Io] = FIND_TARGET(A)
%
% Return the indices of the objects from dataset A which are labeled
% 'target' and 'outlier' in the index vectors It and Io
% respectively. A warning is given when no target objects can be
% found.
%
% See also: isocset, gendatoc, oc_set

% Copyright: D.M.J. Tax, R.P.W. Duin, [e-mail]
% Faculty of Applied Physics, Delft University of Technology
% P.O. Box 5046, 2600 GA Delft, The Netherlands

function [I1,I2] = find_target(a)

% Check that we are dealing with a one-class dataset
if ~is_ocset(a)
    error('Dataset is not a one-class dataset');
end

% first find the target objects:
[nlab,lablist] = getnlab(a);
nr_t = strmatch('target',lablist);
if isempty(nr_t)
	warning('Cannot find target objects in dataset.');
	I1 = [];
else
	I1 = find(nlab==nr_t);
end

% if requested, also find the outliers:
if (nargout>1)
	nr_o = strmatch('outlier',lablist);
	if isempty(nr_o)
		I2 = [];
	else 
		I2 = find(nlab==nr_o);
	end
end

return