R/alphaEstFam.R

In groupedSurv: Efficient Estimation of Grouped Survival Models Using the Exact Likelihood Function

Defines functions alphaEstFam

Documented in alphaEstFam

# Wrapped function to estimate alphas
alphaEstFam <- function(gtime, delta) {
  gtimeFactor <- sort(unique(gtime))
  .Call(
    "_groupedSurv_alphaEst1", 
    PACKAGE = "groupedSurv", 
    gtimeFactor, 
    gtime, 
    delta
  )
}

Try the groupedSurv package in your browser