X-Git-Url: https://git.auder.net/?p=valse.git;a=blobdiff_plain;f=pkg%2FR%2FconstructionModelesLassoMLE.R;fp=pkg%2FR%2FconstructionModelesLassoMLE.R;h=fd0cd4dac8f44a0f561b82e6b47ec4d8a180be20;hp=0584382fa4a602a2651d8022d1635bab6178ea7d;hb=64cceb2ece0d8142fee3e82e1cc56e20261caf45;hpb=01b234a0239845b349bf08bd7fc7d9c74ab83671 diff --git a/pkg/R/constructionModelesLassoMLE.R b/pkg/R/constructionModelesLassoMLE.R index 0584382..fd0cd4d 100644 --- a/pkg/R/constructionModelesLassoMLE.R +++ b/pkg/R/constructionModelesLassoMLE.R @@ -102,7 +102,7 @@ constructionModelesLassoMLE <- function(phiInit, rhoInit, piInit, gamInit, mini, # For each lambda, computation of the parameters out <- if (ncores > 1) { - parLapply(cl, 1:length(S), computeAtLambda) + parallel::parLapply(cl, 1:length(S), computeAtLambda) } else { lapply(1:length(S), computeAtLambda) }