sc_evalars.m

来自「模式识别工具箱。非常丰富的底层函数和常见的统计识别工具」· M 代码 · 共 23 行

function sc_EvalARS(funcstr, maxnum)
global  MaxFuncTmp;
global  FunCount;

MaxFuncTmp = 3e5



[opVal, pbox,ObjStr,opPnt] = GetFuncInfo(funcstr, 0.95);


for i=1:maxnum
    FunCount = 0;
    [pnew, runtimecost,nfeval] = ARSearch('ARS_Obj_Func',pbox,opPnt,opVal, 0,ObjStr);
    f(i) = runtimecost;    
    nf(i) = FunCount;
    x(i,:) = pnew(:)';
end;
    
    
flag = f < opVal;
fname = sprintf('RE_ARS_%s.mat', funcstr); 
save(fname, 'f', 'nf', 'flag','x','maxnum');