projects
/
valse.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
R package can now be installed (compilation OK)
[valse.git]
/
src
/
sources
/
constructionModelesLassoMLE.h
diff --git
a/src/sources/constructionModelesLassoMLE.h
b/src/sources/constructionModelesLassoMLE.h
index
90712e3
..
6a20dc7
100644
(file)
--- a/
src/sources/constructionModelesLassoMLE.h
+++ b/
src/sources/constructionModelesLassoMLE.h
@@
-1,34
+1,32
@@
-#ifndef
select
_constructionModelesLassoMLE_H
-#define
select
_constructionModelesLassoMLE_H
+#ifndef
valse
_constructionModelesLassoMLE_H
+#define
valse
_constructionModelesLassoMLE_H
-#include "ioutils.h"
-
-void constructionModelesLassoMLE(
- // IN parameters
- const Real* phiInit,
- const Real* rhoInit,
- const Real* piInit,
- const Real* gamInit,
- Int mini,
- Int maxi,
- Real gamma,
- const Real* glambda,
- const Real* X,
- const Real* Y,
- Real seuil,
- Real tau,
- const Int* A1,
- const Int* A2,
+void constructionModelesLassoMLE_core(
+ // IN parameters
+ const double* phiInit,
+ const double* rhoInit,
+ const double* piInit,
+ const double* gamInit,
+ int mini,
+ int maxi,
+ double gamma,
+ const double* glambda,
+ const double* X,
+ const double* Y,
+ double seuil,
+ double tau,
+ const int* A1,
+ const int* A2,
// OUT parameters
// OUT parameters
-
Real
* phi,
-
Real
* rho,
-
Real
* pi,
-
Real
* lvraisemblance,
+
double
* phi,
+
double
* rho,
+
double
* pi,
+
double
* lvraisemblance,
// additional size parameters
// additional size parameters
-
mwSize
n,
-
mwSize
p,
-
mwSize
m,
-
mwSize
k,
-
mwSize
L);
+
int
n,
+
int
p,
+
int
m,
+
int
k,
+
int
L);
#endif
#endif