Deviance residuals.

Deviance residuals.

Usage

morie_survival_deviance(cox_result)

Arguments

cox_result

A coxph-style fit (as returned by morie_survival_cox); used by residual diagnostics (coxsnell, martingale, deviance).

Value

A numeric vector of deviance residuals.

Examples

set.seed(1)
df <- data.frame(t = rexp(60), e = rbinom(60, 1, 0.7),
                 x1 = rnorm(60), x2 = rnorm(60))
fit <- morie_survival_cox(df, "t", "e", c("x1", "x2"))
str(morie_survival_deviance(fit), max.level = 1)
#>  Named num [1:60] -0.942 -0.183 1.755 1.923 1.064 ...
#>  - attr(*, "names")= chr [1:60] "1" "2" "3" "4" ...