Create a Compact Report from a Beta-Danish Model Fit

Collects the headline quantities from a fitted model into a small object with a `print` method. Information criteria are computed from the fitted log-likelihood via the `logLik` method, so they cannot fall out of step with the fit.

Usage

report_betadanish(fit)

# S3 method for class 'betadanish_report'
print(x, ...)

Arguments

fit

A fitted `"betadanish"` object.

x

A `"betadanish_report"` object.

...

Ignored.

Value

An object of class `"betadanish_report"`.

Invisibly returns `x`.

Examples

# \donttest{
set.seed(1)
dat <- simulate_bd_data(120, a = 1, b = 3, c = 2, k = 0.5)
fit <- fit_betadanish(survival::Surv(time, status) ~ 1, data = dat,
                      submodel = TRUE)
report_betadanish(fit)
#> Beta-Danish Model Report
#> ------------------------
#> Model:          3-parameter ED submodel (a = 1)
#> Observations:   120  Parameters: 3
#> Log-likelihood: -218.1259
#> AIC:            442.2518
#> BIC:            450.6143
#> Convergence:    0
#> 
#> Estimates:
#>      b      c      k 
#> 3.4810 2.5047 0.5887 
# }