R/print.modreg.R

In dirttee: Distributional Regression for Time to Event Data

Defines functions print.modreg

Documented in print.modreg

print.modreg <-
function(x, ...){
  cat("\nFormula:\n", deparse(x$called$formula), "\n", sep = "")
  cat("\nCoefficients:\n")
  print(summary(x$reg)$p.coeff, ...)
  
  cat("\nBandwidth type:", x$called$bw)
  if(!is.null(x$lambda))cat('\nLambda: ', x$lambda)
}

Try the dirttee package in your browser