epiparameter (version 0.4.1)

is_epiparameter: Check object is an <epiparameter>

Description

Check object is an <epiparameter>

Usage

is_epiparameter(x)

Value

A boolean logical, TRUE if the object is an <epiparameter>

and FALSE if not.

Arguments

x

An R object.

Examples

ep <- epiparameter(
  disease = "ebola",
  epi_name = "serial_interval",
  prob_distribution = create_prob_distribution(
    prob_distribution = "gamma",
    prob_distribution_params = c(shape = 1, scale = 1)
  )
)

is_epiparameter(ep)

false_ep <- list(
  disease = "ebola",
  epi_name = "serial_interval",
  prob_distribution = "gamma",
  prob_distribution_params = c(shape = 1, scale = 1)
)

is_epiparameter(false_ep)