R/logLik.src.r

In SurvRegCensCov: Weibull Regression for a Right-Censored Endpoint with Interval-Censored Covariate

Defines functions logLik.src

Documented in logLik.src

logLik.src <- function(object, ...){
     p1 <- paste("'log Lik.' ", round(object$loglik, 5), " (df=", object$d, ")", sep = "")
     cat(p1)
     invisible(object)
}

Try the SurvRegCensCov package in your browser