function res = evalcross(nets,type,thres)

% res=evalcross(nets,type,thres)
% Wertet alle Netze einer Kreuzvalidierung aus. Alle Ergebnisse werden in
% RES zurückgegeben.
% TYPE kann 'c' (Klassifikation) oder 'r' (Regression) sein
% Wenn TYPE='r' gewählt ist, ist THRES irrelevant (kann weggelassen werden)

if nargin<2
    type='c';
    thres=0.5;
elseif nargein<3
    thres=0.5;
end


n=length(nets);

res=[];
for i=1:n
    if type=='c'
        r=classeval(nets(i),thres);
    else
        r=regeval(nets(i));
    end
    res=[res; r];
end

    