callfitn.m

多智能体工具包

function [fit,fitot]=callfitn(criteria,chrom)
% CALLFITN	Call fitness function for chromosomes.

%     Copyright (c) 1998-2000 Jiming Liu and Jianbing Wu

[pop bitl]=size(chrom); 
for k=1:pop
  fit(k)=feval(criteria,chrom(k,:));
end
fitot=sum(fit);