Compute Calibration from Model Fit

Convenience function that extracts responsibilities from a fitted model and computes calibration against true labels.

Usage

calibrate_model(fit, z_true, n_bins = 10)

Arguments

fit

Fitted mixture model object (MFA or MPCA)

z_true

Integer vector of true cluster labels

n_bins

Number of bins for calibration. Default: 10.

Value

A calibration_result object

Examples

if (FALSE) { # \dontrun{
# Fit model
fit <- mixture_pca_em_fit(list_of_data, K = 3, r = 2)

# Compute calibration
calib <- calibrate_model(fit, z_true)
print(calib)
} # }