X-Git-Url: https://git.auder.net/?p=valse.git;a=blobdiff_plain;f=pkg%2FR%2FconstructionModelesLassoRank.R;h=c219d750d8d207f50e4659be6dad1e4d4cd39fab;hp=9254473dd65a7e0650e3f893185d0eb6f4645b86;hb=2279a641f2bee1db586e7ab1e13726d111d5daaf;hpb=4cc632c9a1e1d93e9a43a402d1361f23afc50e5e diff --git a/pkg/R/constructionModelesLassoRank.R b/pkg/R/constructionModelesLassoRank.R index 9254473..c219d75 100644 --- a/pkg/R/constructionModelesLassoRank.R +++ b/pkg/R/constructionModelesLassoRank.R @@ -1,4 +1,14 @@ -constructionModelesLassoRank = function(pi,rho,mini,maxi,X,Y,tau,A1,rangmin,rangmax) +#' constructionModelesLassoRank +#' +#' TODO: description +#' +#' @param ... +#' +#' @return ... +#' +#' export +constructionModelesLassoRank = function(pi, rho, mini, maxi, X, Y, tau, A1, rangmin, + rangmax, ncores, verbose=FALSE) { #get matrix sizes n = dim(X)[1] @@ -27,7 +37,9 @@ constructionModelesLassoRank = function(pi,rho,mini,maxi,X,Y,tau,A1,rangmin,rang # output parameters phi = array(0, dim=c(p,m,k,L*Size)) llh = matrix(0, L*Size, 2) #log-likelihood - for(lambdaIndex in 1:L) + + # TODO: // loop + for(lambdaIndex in 1:L) { # on ne garde que les colonnes actives # 'active' sera l'ensemble des variables informatives