lfparupd.m

来自「一种求解目标函数最小化的MATLAB仿真程序.」· M 代码 · 共 22 行

display_length=min(k_params,5);
CurrentParam=max([1,round(get(sli_params,'Value'))]);

if exist('ParamSlider')
    if get(ParamSlider,'Value')==1
        % parameter option is chosen
        for i=1:display_length
            param(max(CurrentParam-5,0)+i)=str2num(get(ParamValue(i),'String'));
        end
    else
        % direction option is chosen
        for i=1:display_length,
            p(max(CurrentParam-5,0)+i)=str2num(get(ParamValue(i),'String'));
        end
    end
else
    % only parameter option
    for i=1:display_length
        param(max(CurrentParam-5,0)+i)=str2num(get(ParamValue(i),'String'));
    end
end