| plot.mfrm_bundle | R Documentation |
Plot report/table bundles with base R defaults
## S3 method for class 'mfrm_bundle'
plot(x, y = NULL, type = NULL, ...)
x |
A bundle object returned by mfrmr table/report helpers. |
y |
Reserved for generic compatibility. |
type |
Optional plot type. Available values depend on bundle class. |
... |
Additional arguments forwarded to class-specific plotters. |
plot() dispatches by bundle class:
mfrm_unexpected -> plot_unexpected()
mfrm_fair_average -> plot_fair_average()
mfrm_displacement -> plot_displacement()
mfrm_interrater -> plot_interrater_agreement()
mfrm_facets_chisq -> plot_facets_chisq()
mfrm_bias_interaction -> plot_bias_interaction()
mfrm_bias_count -> bias-count plots (cell counts / low-count rates)
mfrm_fixed_reports -> pairwise-contrast diagnostics
mfrm_visual_summaries -> warning/summary message count plots
mfrm_category_structure -> default base-R category plots
mfrm_category_curves -> default ogive/CCC plots
mfrm_rating_scale -> category-counts/threshold plots
mfrm_measurable -> measurable-data coverage/count plots
mfrm_unexpected_after_bias -> post-bias unexpected-response plots
mfrm_output_bundle -> graph/score output-file diagnostics
mfrm_residual_pca -> residual PCA scree/loadings via plot_residual_pca()
mfrm_specifications -> facet/anchor/convergence plots
mfrm_data_quality -> row-audit/category/missing-row plots
mfrm_iteration_report -> replayed-iteration trajectories
mfrm_subset_connectivity -> subset-observation/connectivity plots
mfrm_facet_statistics -> facet statistic profile plots
If a class is outside these families, use dedicated plotting helpers or custom base R graphics on component tables.
A plotting-data object of class mfrm_plot_data.
The returned object is plotting data (mfrm_plot_data) that captures
the selected route and payload; set draw = TRUE for immediate base graphics.
Create bundle output (e.g., unexpected_response_table()).
Inspect routing with summary(bundle) if needed.
Call plot(bundle, type = ..., draw = FALSE) to obtain reusable plot data.
summary(), plot_unexpected(), plot_fair_average(), plot_displacement()
toy_full <- load_mfrmr_data("example_core")
toy_people <- unique(toy_full$Person)[1:12]
toy <- toy_full[toy_full$Person %in% toy_people, , drop = FALSE]
fit <- suppressWarnings(
fit_mfrm(toy, "Person", c("Rater", "Criterion"), "Score", method = "JML", maxit = 10)
)
t4 <- unexpected_response_table(fit, abs_z_min = 1.5, prob_max = 0.4, top_n = 5)
p <- plot(t4, draw = FALSE)
vis <- build_visual_summaries(fit, diagnose_mfrm(fit, residual_pca = "none"))
p_vis <- plot(vis, type = "comparison", draw = FALSE)
spec <- specifications_report(fit)
p_spec <- plot(spec, type = "facet_elements", draw = FALSE)
if (interactive()) {
plot(
t4,
type = "severity",
draw = TRUE,
main = "Unexpected Response Severity (Customized)",
palette = c(higher = "#d95f02", lower = "#1b9e77", bar = "#2b8cbe"),
label_angle = 45
)
plot(
vis,
type = "comparison",
draw = TRUE,
main = "Warning vs Summary Counts (Customized)",
palette = c(warning = "#cb181d", summary = "#3182bd"),
label_angle = 45
)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.