| dif_report | R Documentation |
Produces APA-style narrative text interpreting the results of a differential-
functioning analysis or interaction table. For method = "refit", the
report summarises the number of facet levels classified as negligible (A),
moderate (B), and large (C). For method = "residual", it summarises
screening-positive results, lists the specific levels and their direction,
and includes a caveat about the distinction between construct-relevant
variation and measurement bias.
dif_report(dif_result, ...)
dif_result |
Output from |
... |
Currently unused; reserved for future extensions. |
When dif_result is an mfrm_dff/mfrm_dif object, the report is based on
the pairwise differential-functioning contrasts in $dif_table. When it is an
mfrm_dif_interaction object, the report uses the cell-level
statistics and flags from $table.
For method = "refit", ETS-style magnitude labels are used only when
subgroup calibrations were successfully linked back to a common baseline
scale; otherwise the report labels those contrasts as unclassified because
the refit difference is descriptive rather than comparable on a linked
logit scale. For method = "residual", the report describes
screening-positive versus screening-negative contrasts instead of applying
ETS labels.
Object of class mfrm_dif_report with narrative,
counts, large_dif, and config.
$narrative: character scalar with the full narrative text.
$counts: named integer vector of method-appropriate counts.
$large_dif: tibble of large ETS results (method = "refit") or
screening-positive contrasts/cells (method = "residual").
$config: analysis configuration inherited from the input.
Run analyze_dff() / analyze_dif() or dif_interaction_table().
Pass the result to dif_report().
Print the report or extract $narrative for inclusion in a
manuscript.
analyze_dff(), analyze_dif(), dif_interaction_table(),
plot_dif_heatmap(), build_apa_outputs()
toy <- load_mfrmr_data("example_bias")
fit <- fit_mfrm(toy, "Person", c("Rater", "Criterion"), "Score",
method = "JML", model = "RSM", maxit = 25)
diag <- diagnose_mfrm(fit, residual_pca = "none")
dif <- analyze_dff(fit, diag, facet = "Rater", group = "Group", data = toy)
rpt <- dif_report(dif)
cat(rpt$narrative)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.