Commit c713ea61 authored by Tom Reynkens's avatar Tom Reynkens

Show warning when lambda1 > 0 or lambda2 > 0 and penalty weights are inputted manually by the user

parent f1bb5135
Type: Package
Package: smurf
Title: Sparse Multi-Type Regularized Feature Modeling
Version: 0.4.0.9001
Version: 0.4.0.9002
Date: 2018-09-25
Authors@R: c(
person("Tom", "Reynkens", email = "tomreynkens@hotmail.com", role = c("aut", "cre"),
......
......@@ -341,7 +341,14 @@ glmsmurf.fit <- function(X, y, weights, start, offset, family, pen.cov, n.par.co
lambda1 <- L$lambda1
# Get list with lambda2 multiplied with penalty weights (for Group Lasso penalty) per predictor
lambda2 <- L$lambda2
}
} else {
# Show warning when lambda1.orig > 0 or lambda2.orig > 0 and penalty weights are inputted manually by the user
if (lambda1.orig > 0 & lambda2.orig > 0) {
warning("When lambda1 > 0 or lambda2 > 0, it is more reliable to let 'glmsmurf' or 'glmsmurf.fit' compute the penalty weights instead of inputting them manually via 'pen.weights'. ")
}
}
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment