| bias_interaction_report | R Documentation |
Build a bias-interaction plot-data bundle (preferred alias)
bias_interaction_report(
x,
diagnostics = NULL,
facet_a = NULL,
facet_b = NULL,
interaction_facets = NULL,
max_abs = 10,
omit_extreme = TRUE,
max_iter = 4,
tol = 0.001,
top_n = 50,
abs_t_warn = 2,
abs_bias_warn = 0.5,
p_max = 0.05,
sort_by = c("abs_t", "abs_bias", "prob")
)
x |
Output from |
diagnostics |
Optional output from |
facet_a |
First facet name (required when |
facet_b |
Second facet name (required when |
interaction_facets |
Character vector of two or more facets. |
max_abs |
Bound for absolute bias size when estimating from fit. |
omit_extreme |
Omit extreme-only elements when estimating from fit. |
max_iter |
Iteration cap for bias estimation when |
tol |
Convergence tolerance for bias estimation when |
top_n |
Maximum number of ranked rows to keep. |
abs_t_warn |
Warning cutoff for absolute t statistics. |
abs_bias_warn |
Warning cutoff for absolute bias size. |
p_max |
Warning cutoff for p-values. |
sort_by |
Ranking key: |
Preferred bundle API for interaction-bias diagnostics. The function can:
use a precomputed bias object from estimate_bias(), or
estimate internally from mfrm_fit + facet specification.
A named list with bias-interaction plotting/report components. Class:
mfrm_bias_interaction.
Focus on ranked rows where multiple screening criteria converge:
large absolute t statistic
large absolute bias size
small screening tail area
The bundle is optimized for downstream summary() and
plot_bias_interaction() views.
Run estimate_bias() (or provide mfrm_fit here).
Build bias_interaction_report(...).
Review summary(out) and visualize with plot_bias_interaction().
estimate_bias(), build_fixed_reports(), plot_bias_interaction()
toy <- load_mfrmr_data("example_bias")
fit <- fit_mfrm(toy, "Person", c("Rater", "Criterion"), "Score", method = "JML", maxit = 25)
diag <- diagnose_mfrm(fit, residual_pca = "none")
bias <- estimate_bias(fit, diag, facet_a = "Rater", facet_b = "Criterion", max_iter = 2)
out <- bias_interaction_report(bias, top_n = 10)
summary(out)
p_bi <- plot(out, draw = FALSE)
class(p_bi)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.