R/rCB12NB.R

In ComRiskModel: Fitting of Complementary Risk Models

Defines functions rCB12NB

Documented in rCB12NB

#' @export
#' @import stats

rCB12NB<-function(n, a, b, k, s, lambda)
	{
    p <- runif(n, min = 0, max = 1)
    rn <- qCB12NB(p, a, b, k, s, lambda)
    return(rn)
	}

Try the ComRiskModel package in your browser