projects
/
valse.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
...
[valse.git]
/
pkg
/
R
/
constructionModelesLassoRank.R
diff --git
a/pkg/R/constructionModelesLassoRank.R
b/pkg/R/constructionModelesLassoRank.R
index
5857a42
..
dc88f67
100644
(file)
--- a/
pkg/R/constructionModelesLassoRank.R
+++ b/
pkg/R/constructionModelesLassoRank.R
@@
-19,11
+19,11
@@
#'
#' @export
constructionModelesLassoRank <- function(S, k, mini, maxi, X, Y, eps, rank.min, rank.max,
#'
#' @export
constructionModelesLassoRank <- function(S, k, mini, maxi, X, Y, eps, rank.min, rank.max,
- ncores, fast
= TRUE, verbose = FALSE
)
+ ncores, fast
, verbose
)
{
{
- n <-
dim(X)[1]
- p <-
dim(X)[2]
- m <-
dim(Y)[2]
+ n <-
nrow(X)
+ p <-
ncol(X)
+ m <-
ncol(Y)
L <- length(S)
# Possible interesting ranks
L <- length(S)
# Possible interesting ranks