Parametric survival fit by maximum likelihood

ML for a log-location-scale family with right censoring, maximising prod f(t)^delta S(t)^(1-delta).

Usage

Parasurv(time, event, dist = "weibull")

morie_survival_parametric(time, event, dist = "weibull")

Arguments

time: observed follow-up times.
event: event indicator, 1 = event, 0 = censored.
dist: distribution: one of weibull, exponential, lognormal or loglogistic.

Value

list with the location and scale estimates, the log-likelihood, AIC and BIC.

References

Kalbfleisch, J. D. and Prentice, R. L. (2002). The Statistical Analysis of Failure Time Data, 2nd ed., Wiley.

Examples

Parasurv(time = c(1, 2, 3, 4, 5, 6, 7, 8), event = c(0, 1, 0, 1, 1, 0, 1, 0))
#> $dist
#> [1] "weibull"
#> 
#> $coef
#> [1] 1.945123
#> 
#> $log_scale
#> [1] -0.8480575
#> 
#> $scale
#> [1] 0.428246
#> 
#> $loglik
#> [1] -5.618207
#> 
#> $n_par
#> [1] 2
#> 
#> $n
#> [1] 8
#> 
#> $n_events
#> [1] 4
#> 
#> $aic
#> [1] 15.23641
#> 
#> $bic
#> [1] 15.3953
#> 
#> $fixed_scale
#> [1] FALSE
#> 
#> $convergence
#> [1] 0
#> 
#> $intercept
#> [1] 1.945123
#> 
#> $weibull_shape
#> [1] 2.335107
#> 
#> $weibull_scale
#> [1] 6.99449
#> 
#> $lr_vs_exponential
#> [1] 3.071804
#> 
#> $lr_p_value
#> [1] 0.07966103
#> 
#> $constant_hazard_rejected
#> [1] FALSE
#> 
#> $method
#> [1] "maximum likelihood for a log-location-scale family with right censoring"
#>