projects
/
valse.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
fix memory leaks on EMGLLF, test OK for EMGrank
[valse.git]
/
src
/
sources
/
constructionModelesLassoMLE.c
diff --git
a/src/sources/constructionModelesLassoMLE.c
b/src/sources/constructionModelesLassoMLE.c
index
6b92094
..
ad2a718
100644
(file)
--- a/
src/sources/constructionModelesLassoMLE.c
+++ b/
src/sources/constructionModelesLassoMLE.c
@@
-25,7
+25,7
@@
void constructionModelesLassoMLE_core(
Real* phi,// estimateur ainsi calculé par le Lasso
Real* rho,// estimateur ainsi calculé par le Lasso
Real* pi, // estimateur ainsi calculé par le Lasso
Real* phi,// estimateur ainsi calculé par le Lasso
Real* rho,// estimateur ainsi calculé par le Lasso
Real* pi, // estimateur ainsi calculé par le Lasso
- Real* l
vraisemblance
, // estimateur ainsi calculé par le Lasso
+ Real* l
lh
, // estimateur ainsi calculé par le Lasso
// additional size parameters
int n, // taille de l'echantillon
int p, // nombre de covariables
// additional size parameters
int n, // taille de l'echantillon
int p, // nombre de covariables
@@
-204,8
+204,8
@@
void constructionModelesLassoMLE_core(
}
sumLogDensit += log(densite[lambdaIndex*n+i]);
}
}
sumLogDensit += log(densite[lambdaIndex*n+i]);
}
- l
vraisemblance
[mi(lambdaIndex,0,L,2)] = sumLogDensit;
- l
vraisemblance
[mi(lambdaIndex,1,L,2)] = (dimension+m+1)*k-1;
+ l
lh
[mi(lambdaIndex,0,L,2)] = sumLogDensit;
+ l
lh
[mi(lambdaIndex,1,L,2)] = (dimension+m+1)*k-1;
free(a);
free(YiRhoR);
free(a);
free(YiRhoR);