X-Git-Url: https://git.auder.net/?a=blobdiff_plain;f=pkg%2Fsrc%2Fsources%2FEMGLLF.c;h=b77f24a7ff218d115f2981bf77f2e646f1856ade;hb=f32535f2bc8d50470aa87204bbd7971805dbc9ef;hp=d9f92c049745c1304b1852df9f509c18a841a308;hpb=23b9fb13bc6e82d7ca43bfb83aa85b6cd69c52c0;p=valse.git diff --git a/pkg/src/sources/EMGLLF.c b/pkg/src/sources/EMGLLF.c index d9f92c0..b77f24a 100644 --- a/pkg/src/sources/EMGLLF.c +++ b/pkg/src/sources/EMGLLF.c @@ -16,7 +16,7 @@ void EMGLLF_core( Real lambda, // valeur du paramètre de régularisation du Lasso const Real* X, // régresseurs const Real* Y, // réponse - Real tau, // seuil pour accepter la convergence + Real eps, // seuil pour accepter la convergence // OUT parameters (all pointers, to be modified) Real* phi, // parametre de moyenne renormalisé, calculé par l'EM Real* rho, // parametre de variance renormalisé, calculé par l'EM @@ -379,7 +379,7 @@ void EMGLLF_core( if (Dist3 > dist2) dist2 = Dist3; - if (ite >= mini && (dist >= tau || dist2 >= sqrt(tau))) + if (ite >= mini && (dist >= eps || dist2 >= sqrt(eps))) break; } @@ -417,4 +417,4 @@ void EMGLLF_core( free(X2); free(Y2); free(sqNorm2); -} +}