tests/testthat/testS4/R/multi.R

In doclisting: List Functions in Documentation

#' An s4 generic
#'
#' @export
setGeneric("multi", function(x, y) {
  x
})

#' @rdname multi
#' @export
setMethod("multi", signature(x = "numeric"), function(x, y) {
  x
})

#' @rdname multi
#' @export
setMethod(
  "multi",
  signature(x = "numeric", y = "integer"),
  function(x, y) {
    x
  }
)

#' @export
setMethod("multi", signature(x = "character"), function(x, y) {
  x
})