Fine-Gray subdistribution hazard model (competing risks). — morie_survival

Requires the cmprsk package.

Usage

morie_survival_finegray(
  data,
  duration_col,
  event_col,
  covariate_cols,
  event_of_interest = 1L,
  confidence = 0.95
)

Arguments

data: A data.frame whose columns supply duration_col, event_col, covariate_cols, etc.
duration_col: Character; column name of the event/censoring time in data.
event_col: Character; column name of the event-indicator variable in data.
covariate_cols: Character vector of covariate column names.
event_of_interest: Integer event-type code for competing- risks analyses (Fine-Gray, CIF).
confidence: Confidence level for interval estimates (default 0.95).

Value

A named list with elements coefficients, standard_errors, hazard_ratios, p_values, ci_lower, ci_upper, covariate_names, n_events, n_observations, method.

Examples

# \donttest{
if (requireNamespace("cmprsk", quietly = TRUE)) {
  set.seed(1)
  df <- data.frame(t = rexp(80), e = sample(0:2, 80, replace = TRUE),
                   x1 = rnorm(80))
  str(morie_survival_finegray(df, "t", "e", "x1"), max.level = 1)
}
#> List of 10
#>  $ coefficients   : Named num -0.13
#>   ..- attr(*, "names")= chr "x1"
#>  $ standard_errors: num 0.165
#>  $ hazard_ratios  : Named num 0.878
#>   ..- attr(*, "names")= chr "x1"
#>  $ p_values       : num 0.43
#>  $ ci_lower       : num 0.636
#>  $ ci_upper       : num 1.21
#>  $ covariate_names: chr "x1"
#>  $ n_events       : int 25
#>  $ n_observations : int 80
#>  $ method         : chr "Fine-Gray subdistribution hazard"
# }