projects
/
valse.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
test auto-indenter
[valse.git]
/
pkg
/
R
/
constructionModelesLassoRank.R
diff --git
a/pkg/R/constructionModelesLassoRank.R
b/pkg/R/constructionModelesLassoRank.R
index
4937830
..
b997303
100644
(file)
--- a/
pkg/R/constructionModelesLassoRank.R
+++ b/
pkg/R/constructionModelesLassoRank.R
@@
-14,7
+14,7
@@
#' @param ncores Number of cores, by default = 3
#' @param fast TRUE to use compiled C code, FALSE for R code only
#' @param verbose TRUE to show some execution traces
#' @param ncores Number of cores, by default = 3
#' @param fast TRUE to use compiled C code, FALSE for R code only
#' @param verbose TRUE to show some execution traces
-#'
+#'
#' @return a list with several models, defined by phi, rho, pi, llh
#'
#' @export
#' @return a list with several models, defined by phi, rho, pi, llh
#'
#' @export
@@
-80,7
+80,6
@@
constructionModelesLassoRank <- function(S, k, mini, maxi, X, Y, eps, rank.min,
phi[relevant, , ] <- res$phi
}
list(llh = llh, phi = phi, pi = S[[lambdaIndex]]$Pi, rho = S[[lambdaIndex]]$Rho)
phi[relevant, , ] <- res$phi
}
list(llh = llh, phi = phi, pi = S[[lambdaIndex]]$Pi, rho = S[[lambdaIndex]]$Rho)
-
}
}
}
}