Removed unnecessary code

ocbe-uio · Aug 20, 2024 · ead9b23 · ead9b23
1 parent 41cff7d
commit ead9b23
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/MADMMplasso.R b/R/MADMMplasso.R
@@ -218,15 +218,15 @@ MADMMplasso <- function(X, Z, y, alpha, my_lambda = NULL, lambda_min = 0.001, ma
     doParallel::registerDoParallel(cl = cl)
     foreach::getDoParRegistered()
     if (legacy) {
-      my_values <- foreach(i = 1:nlambda, .packages = "MADMMplasso") %dopar% {
+      my_values <- foreach(i = 1:nlambda) %dopar% {
         admm_MADMMplasso(
           beta0, theta0, beta, beta_hat, theta, rho1, X, Z, max_it, my_W_hat, XtY,
           y, N, e.abs, e.rel, alpha, lam[i, ], alph, svd.w, tree, my_print,
           invmat, gg[i, ]
         )
       }
     } else {
-      my_values <- foreach(i = 1:nlambda, .packages = "MADMMplasso") %dopar% {
+      my_values <- foreach(i = 1:nlambda) %dopar% {
         admm_MADMMplasso_cpp(
           beta0, theta0, beta, beta_hat, theta, rho1, X, Z, max_it, my_W_hat, XtY,
           y, N, e.abs, e.rel, alpha, lam[i, ], alph, svd_w_tu, svd_w_tv, svd_w_d,