R/is.R

Defines functions is.summary.multisimsum is.multisimsum is.summary.simsum is.simsum

Documented in is.multisimsum is.simsum is.summary.multisimsum is.summary.simsum

#' @title is.simsum
#' @description Reports whether x is a simsum object
#' @param x An object to test.
#' @export
is.simsum <- function(x) {
  inherits(x, "simsum")
}

#' @title is.summary.simsum
#' @description Reports whether x is a summary.simsum object
#' @param x An object to test.
#' @export
is.summary.simsum <- function(x) {
  inherits(x, "summary.simsum")
}

#' @title is.multisimsum
#' @description Reports whether x is a multisimsum object
#' @param x An object to test.
#' @export
is.multisimsum <- function(x) {
  inherits(x, "multisimsum")
}

#' @title is.summary.multisimsum
#' @description Reports whether x is a summary.multisimsum object
#' @param x An object to test.
#' @export
is.summary.multisimsum <- function(x) {
  inherits(x, "summary.multisimsum")
}

Try the rsimsum package in your browser

Any scripts or data that you put into this service are public.

rsimsum documentation built on March 22, 2022, 5:08 p.m.