classsize.m

一个关于数据聚类和模式识别的程序,在生物化学,化学中因该都可以用到.希望对大家有用,谢谢支持

function [class, count] = classSize(DS, plotOpt)
%classSize: Class sizes for a sample data set
%	Usage: [class, count] = classSize(DS)

%	Roger Jang, 1997xxxx, 20041208, 20080827

if nargin<1, selfdemo; return; end
if nargin<2, plotOpt=0; end

[featureNum, dataNum] = size(DS.input);	% no. of features
[class, count] = elementCount(DS.output);
classNum = length(class);	% No. of classes

% Plot class distribution
if plotOpt
	fprintf('%g features\n', featureNum);
	fprintf('%g instances\n', dataNum);
	fprintf('%g classes\n', classNum);
	bar(class, count);
	xlabel('Classes');
	ylabel('Counts');
	if isfield(DS, 'dataName'), title(sprintf('Class distribution for "%s"', DS.dataName)); end
end

% ====== Self demo
function selfdemo
DS=prData('abalone');
plotOpt=1;
feval(mfilename, DS, plotOpt);