Method for inverse gamma delay with uniform primary

Analytical solution for the inverse gamma distribution of extraDistr::pinvgamma(), with shape alpha and scale beta. The extraDistr package is needed to create the pcens object. The solution needs a finite mean, so shapes at or below 1 use the numerical pcens_cdf.default() method. See vignette("analytic-solutions") for the derivation.

Usage

# S3 method for class 'pcens_pinvgamma_dunif'
pcens_cdf(object, q, pwindow, use_numeric = FALSE)

Arguments

object

A primarycensored object as created by new_pcens().

q

Vector of quantiles

pwindow

Primary event window. Use pwindow = 0 for an exactly observed primary event, in which case the delay CDF is used directly.

use_numeric

Logical, if TRUE forces use of numeric integration even for distributions with analytical solutions. This is primarily useful for testing purposes or for settings where the analytical solution breaks down.

Value

Vector of computed primary event censored CDFs

See also

Low level primary event censored distribution objects and methods new_pcens(), pcens_cdf(), pcens_cdf.default(), pcens_cdf.pcens_pbeta_dunif(), pcens_cdf.pcens_pchisq_dunif(), pcens_cdf.pcens_pdiscretehazard(), pcens_cdf.pcens_pdiscretestep(), pcens_cdf.pcens_pexp_dunif(), pcens_cdf.pcens_pgamma_dunif(), pcens_cdf.pcens_pgengamma.orig_dunif(), pcens_cdf.pcens_pgengamma_dunif(), pcens_cdf.pcens_pinvchisq_dunif(), pcens_cdf.pcens_plnorm_dunif(), pcens_cdf.pcens_pnorm_dunif(), pcens_cdf.pcens_ppareto_dunif(), pcens_cdf.pcens_pweibull_dunif(), pcens_pmf(), pcens_pmf.default(), pcens_quantile(), pcens_quantile.default(), update.pcens()

Examples

pcens_obj <- new_pcens(
  pdist = extraDistr::pinvgamma,
  dprimary = dunif,
  primary_args = list(min = 0, max = 1),
  alpha = 3,
  beta = 2
)
pcens_cdf(pcens_obj, q = c(1, 4, 8), pwindow = 1)
#> [1] 0.2706706 0.9789848 0.9973887