Proportional reduce or increase the hazard rate of a distribution.

apply_hr(dist, hr, log_hr = FALSE)

Arguments

dist

A survival distribution.

hr

A hazard ratio to be applied.

log_hr

If TRUE, the hazard ratio is exponentiated before being applied.

Value

A surv_ph object.

Examples

dist1 <- define_survival(distribution = "exp", rate = .25) ph_dist <- apply_hr(dist1, 0.5)