qnormweibull: Density of a Gaussian Variable Plus an Weibull Variable

View source: R/normexp.R

qnormweibullR Documentation

Density of a Gaussian Variable Plus an Weibull Variable

Description

Density of a Gaussian Variable Plus an Weibull Variable

Usage

qnormweibull(p, scale, shape, rho)

Examples

## Not run: 
n <- 5e6

c(qnormweibull(0.5, scale = 1/2, shape = 1, rho = 1.5),
 quantile(rnorm(n) + 1.5 * rweibull(n, scale = 1/2, shape = 1), 0.5))
c(qnormweibull(0.95, scale = 10, shape = 1, rho = 1.5),
quantile(rnorm(n) + 1.5 * rweibull(n, scale = 10, shape = 1), 0.95))

c(qnormweibull(0.5, scale = 1/2, shape = 2, rho = 1.5),
quantile(rnorm(n) + 1.5 * rweibull(n, scale = 1/2, shape = 2), 0.5))
c(qnormweibull(0.95, scale = 10, shape = 2, rho = 1.5),
quantile(rnorm(n) + 1.5 * rweibull(n, scale = 10, shape = 2), 0.95))

c(qnormweibull(0.5, scale = 1/2, shape = 1, rho = -1.5),
quantile(rnorm(n) - 1.5 * rweibull(n, scale = 1/2, shape = 1), 0.5))
c(qnormweibull(0.95, scale = 10, shape = 1, rho = -1.5),
quantile(rnorm(n) - 1.5 * rweibull(n, scale = 10, shape = 1), 0.95))

c(qnormweibull(0.5, scale = 1/2, shape = 2, rho = -1.5),
quantile(rnorm(n) - 1.5 * rweibull(n, scale = 1/2, shape = 2), 0.5))
c(qnormweibull(0.95, scale = 10, shape = 2, rho = -1.5),
quantile(rnorm(n) - 1.5 * rweibull(n, scale = 10, shape = 2), 0.95))


## End(Not run)

BuyseTest documentation built on March 31, 2023, 6:55 p.m.