checkconvergence.m

来自「有监督自组织映射-偏最小二乘算法(A supervised self-organ」· M 代码 · 共 13 行

function [ExitLogical] = CheckConvergence(OldXMap, NewXMap, MLKP);

ExitLogical = 'N';
if upper(MLKP.CheckConv) =='Y'
    SumDiffX = sum(sum(abs(NewXMap-OldXMap)));
    SumMapX = sum(sum(abs(NewXMap)));
    CheckVal = SumDiffX/SumMapX;
    if  CheckVal < MLKP.ExitLimit
        ExitLogical = 'Y';
        Message=sprintf('Convergence criterion reached: %g',CheckVal);
        disp(Message);
    end
end