Delinted

ocbe-uio · Jun 26, 2024 · c455763 · c455763
1 parent 83db6cd
commit c455763
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/MADMMplasso.R b/R/MADMMplasso.R
@@ -50,7 +50,7 @@
 #' @example inst/examples/MADMMplasso_example.R
 #' @export
 MADMMplasso <- function(X, Z, y, alpha, my_lambda = NULL, lambda_min = 0.001, max_it = 50000, e.abs = 1E-3, e.rel = 1E-3, maxgrid, nlambda, rho = 5, my_print = FALSE, alph = 1.8, tree, parallel = TRUE, pal = !parallel, gg = NULL, tol = 1E-4, cl = 4, legacy = FALSE) {
-  if (parallel & pal) {
+  if (parallel && pal) {
     stop("parallel and pal cannot be TRUE at the same time")
   }
   N <- nrow(X)