draw_pareto.sci

来自「站长您好！GATS是一种遗传算法工具箱」· SCI 代码 · 共 16 行

function [x]=draw_Pareto(traceInfo,best,pareto,Opt)

if Opt(1)
    xbasc();		// clear screen
end;

[a,c]=sort(pareto(:,1));
x=pareto(c(:,1),1)';		// Pareto Border x coordinate
y1=pareto(c(:,1),2);		// Pareto Border y coordinate
y2=(10 ./x)';				// theoritical optimization coordinate
plot2d(x, [y1, y2]);
x = TK_GetVar('user_stop');	// check whether user stop
x = eval(x);
endfunction