1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
#' @title Check parameter / parameter set for requirements / dependencies.
#'
#' @description
#' `TRUE` iff the parameter has any requirements or any parameter in the set has
#' requirements.
#'
#' @template arg_par_or_set
#' @return `logical(1)`.
#' @export
hasRequires = function(par) {
UseMethod("hasRequires")
}
#' @export
hasRequires.Param = function(par) {
return(!is.null(par$requires))
}
#' @export
hasRequires.ParamSet = function(par) {
return(any(vapply(par$pars, hasRequires, logical(1L))))
}
|
