da_tags.m

王小平《遗传算法——理论、应用与软件实现》随书光盘

function [in_tags,out_tags]=da_tags(tags,include_var,output_var);
%
% Constructs a list of tags, given the selected I/O's
%
in_tags=[];
out_tags=[];
[D L]=size(tags);
in_count=1;
out_count=1;
for i=1:D
	if include_var(i)==1
		if output_var(i)==1
			if out_count==1
				out_tags=tags(i,:);
			else
				out_tags=str2mat(out_tags,tags(i,:));
			end
	       		out_count=out_count+1;
		elseif output_var(i)==0
			if in_count==1
				in_tags=tags(i,:);
			else
				in_tags=str2mat(in_tags,tags(i,:));
			end
			in_count=in_count+1;
		end
	end
end