Extract the log likelihood.

Extract the maximized log likelihood of a progression model for repeated measures (PMRM).

Usage

# S3 method for class 'pmrm_fit'
logLik(object, ...)

Arguments

object

A fitted model object of class "pmrm_fit".

...

Not used.

Value

Numeric scalar, the maximized log likelihood of the fitted model.

See also

Other model comparison: AIC.pmrm_fit(), BIC.pmrm_fit(), confint.pmrm_fit(), deviance.pmrm_fit(), glance.pmrm_fit(), summary.pmrm_fit()

Examples

  set.seed(0L)
  simulation <- pmrm_simulate_decline_proportional(
    visit_times = seq_len(5L) - 1,
    gamma = c(1, 2)
  )
  fit <- pmrm_model_decline_proportional(
    data = simulation,
    outcome = "y",
    time = "t",
    patient = "patient",
    visit = "visit",
    arm = "arm",
    covariates = ~ w_1 + w_2
  )
  logLik(fit)
#> [1] -2114.424