Hazard function for a Weibull distribution.

Returns a function that evaluates the Weibull hazard rate \(h(t) = (shape/scale)(t/scale)^{shape-1}\) for \(t > 0\).

# S3 method for class 'weibull_dist'
hazard(x, ...)

Arguments

x

A weibull_dist object.

...

Additional arguments (not used).

Value

A function function(t, log = FALSE) returning the hazard (or log-hazard) at t.

Examples

x <- weibull_dist(shape = 2, scale = 3)
h <- hazard(x)
h(1)
#> [1] 0.2222222
h(3)
#> [1] 0.6666667