R/S4.R

Defines functions testS4

Documented in testS4

#' This is a S4 class A.
#'
#' @export
#' @import methods
#' @examples
#' print(new("A"))
setClass("A", contains = "list")

#' @export
#' @rdname A-class
setMethod("show", "A", function(object) {
  cat("Hi!\n")
})

#' A simple test function
#'
#' @export
testS4 <- function() {
  A <- new("A")
  print(A)
}
hadley/simpleS4 documentation built on May 17, 2019, 12:47 p.m.