library(dplyr)
my_lambda <- penalty() %>%
value_set(-4:-1)
try(
range_validate(my_lambda, c(-10, NA)),
silent = TRUE
) %>%
print()
range_get(my_lambda)
my_lambda %>%
range_set(c(-10, 2)) %>%
range_get()
Run the code above in your browser using DataLab