R/getTags.R

In jakobbossek/smoof: Single and Multi-Objective Optimization Test Functions

#' Returns the vector of associated tags.
#'
#' @template arg_smoof_function
#' @return [\code{character}]
#'  Vector of associated tags.
#' @export
getTags = function(fn) {
  UseMethod("getTags")
}

#' @export
getTags.smoof_function = function(fn) {
  return(attr(fn, "tags"))
}

#' @export
getTags.smoof_wrapped_function = function(fn) {
  return(getTags(getWrappedFunction(fn)))
}

#' @export
getTags.smoof_generator = function(fn) {
  return(attr(fn, "tags"))
}