Returns a function that evaluates the log-normal hazard rate \(h(t) = f(t) / S(t)\) for \(t > 0\).

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

Arguments

x

A lognormal object.

...

Additional arguments (not used).

Value

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

Examples

x <- lognormal(0, 1)
h <- hazard(x)
h(1)
#> [1] 0.7978846
h(2)
#> [1] 0.6426403